How OnZoomChange functions

[Mirage]

Hello

How OnZoomChange functions????
Please give me example.

Thank you

[elias]

Please write "SimpleGraphZoomChange" in ZoomChange (In the Object Inspector);
You'll see this:

Code: Select all

procedure TMainForm.SimpleGraphZoomChange(Sender: TObject);
begin

end;

Now write:

Code: Select all

procedure TMainForm.SimpleGraphZoomChange(Sender: TObject);
begin
showmessage('Here comes the Zoom event');
end;

This way, each time you increse or decrease the zoom, you will run the SimpleGraphZoomChange.

Is this what you were asking for???