TMapView.OnChangeViewScale

TMapView

Вызывается перед сменой масштаба отображения.

TChangeScaleEvent = procedure (Sender: TObject; OldScale: integer; NewScale: integer) of object;

property OnChangeViewScale: TChangeScaleEvent;

Описание:

Событие генерируется при изменении значения свойства ViewScale.

Параметры события:

Sender                 - объект типа TmapView, TmapWindow.

       OldScale        - старый масштаб отображения.

       NewScfle        - новый масштаб отображения.