Declaration
property OnZoomIn: TIEZoomEvent;
Description
Occurs whenever the user zooms into the current image (increases 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
ZoomIn method. Does not occur with programmatic changes to
Zoom// Min zoom-in of 10%
Procedure Tform1.ImageEnView1ZoomIn(Sender: TObject; var NewZoom: Double);
Begin
if NewZoom < 10 then
NewZoom := 10;
End;