ImageEn, unit ieview

TIEView.OnZoomIn

TIEView.OnZoomIn


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: Does not occur with programmatic zoom changes


Example

// Min zoom-in of 10%
Procedure Tform1.ImageEnView1ZoomIn(Sender: TObject; var NewZoom: Double);
Begin
  if NewZoom < 10 then
    NewZoom := 10;
End;