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