Нашли ошибку? Выделите
текст с ошибкой и нажмите кнопку "Сообщить об ошибке"
или CTRL+ENTER.
Справочная
система на версию 10.6
от 08/10/2024,
© ООО «ФОРСАЙТ»,
TabBeforeObjectAngleChangeEventArgs(TabSheet: ITabSheetBox;
Object:
ITabObject;
Type:
TabObjectChangeType;
Value: IGxRectF;
Cancel: Boolean);
TabSheet. Компонент, для которого генерируется событие;
Object. Объект, для которого генерируется событие;
Type. Тип изменения, которое происходит с объектом;
Value. Новое положение и размер объекта;
Cancel. Признак того, отменять ли вращение объекта.
Конструктор Create создаёт аргумент события, возникающего до перемещения объекта или изменения его размеров.
По умолчанию аргументы события генерируются автоматически при наступлении события. Конструктор требуется для вызова события вручную. Подробнее о ручной генерации событий вы можете узнать в разделе «Генерация событий вручную».
Допустимые значения параметра Cancel:
True. Перемещение или изменение размеров объекта будет отменено;
False. Перемещение или изменение размеров объекта будет выполнено.
Для выполнения примера предполагается наличие формы, содержащей компоненты:
TabSheetBox с идентификатором «TabSheetBox1». Для данного компонента должен быть назначен обработчик события OnBeforeObjectChange.
UiReport с идентификатором «UiReport1», являющийся источником данных для «TabSheetBox1». Также «UiReport1» должен быть активен и содержать загруженный регламентный отчет с фигурами на активном листе.
Добавьте ссылку на системную сборку Drawing.
Sub UserProc;
Var
Tab: ITabSheet;
tObject: ITabObject;
Rect: IGxRectF;
Argument: TabBeforeObjectRectChangeEventArgs;
Begin
Tab := TabSheetBox1.Source.GetTabSheet;
tObject := Tab.Objects.Item(0);
Rect := New GxRectF.Create(10, 10, 60, 60);
Argument := New TabBeforeObjectRectChangeEventArgs.Create(TabSheetBox1, tObject, TabObjectChangeType.Rect, Rect, False);
TabSheetBox1.OnBeforeObjectChange(TabSheetBox1, Argument);
End Sub UserProc;
В результате выполнения процедура вызовет событие OnBeforeObjectChange в компоненте «TabSheetBox1».
См. также:
TabBeforeObjectRectChangeEventArgs