ImageEn, unit ieview

TIEView.OnZoomOut

TIEView.OnZoomOut


Declaration

property OnZoomOut: TIEZoomEvent;


Description

Occurs whenever the user zooms out of the current image (reduces its display size).
You can customize the zoom value by changing the NewZoom parameter, e.g. to apply a minimum or maximum zoom.

Note: Does not occur with programmatic zoom changes


Example

// Max zoom-out to 200%
Procedure Tform1.ImageEnView1ZoomOut(Sender: TObject; var NewZoom: Double);
Begin
  if NewZoom > 200 then
    NewZoom := 200;
End;