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: Only occurs with user zooming (e.g. mouse wheel, toolbar or actions) or the ZoomOut method. Does not occur with programmatic changes to Zoom


Example

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