Нашли ошибку? Выделите
текст с ошибкой и нажмите кнопку "Сообщить об ошибке"
или CTRL+ENTER.
Справочная
система на версию 10.6
от 08/10/2024,
© ООО «ФОРСАЙТ»,
Sub OnScaleChange(Sender: Object; Args: ITabScaleEventArgs);
Begin
//набор операторов
End Sub OnScaleChange;
Sender - параметр, указывающий на компонент, в котором произошло событие.
Args - параметр, позволяющий определить дополнительные параметры события.
Событие OnScaleChange возникает при изменении масштаба таблицы.
Для выполнения примера данную процедуру необходимо назначить в качестве обработчика события OnScaleChange для компонента TabSheetBox с идентификатором «TabSheetBox1».
Sub TabSheetBox1OnScaleChange(Sender: Object; Args: ITabScaleEventArgs);
Var
d: Double;
Begin
d:=Args.Scale;
End Sub TabSheetBox1OnScaleChange;
После выполнения события в переменной «d» будет содержаться новый масштаб таблицы.
См. также: