Sub OnBeforeDeleteControl(Control: IPrxControl; Var Cancel: Boolean);
Begin
//набор операторов;
End Sub OnBeforeDeleteControl;
Control. Элемент управления, сгенерировавший событие.
Cancel. Параметр, отвечающий за удаление элемента управления.
Метод OnBeforeDeleteControl реализует событие, происходящее перед удалением элемента управления.
Допустимые значения параметра Cancel:
True. Элемент управления будет удалён;
False. Элемент управления не будет удалён.
Для реализации события, происходящего при изменении значения элемента управления регламентного отчета, используйте метод ReportEvents.OnChangeControlValue.
Указанный класс является обработчиком событий регламентного отчёта.
Добавьте ссылку на системную сборку Ui.
Class EventsClass: ReportEvents
Public Sub OnBeforeDeleteControl(Control: IPrxControl; Var Cancel: Boolean);
Begin
If Not WinApplication.ConfirmationBox("Удалить элемент управления?") Then
Cancel := True;
End If;
End Sub OnBeforeDeleteControl;
End Class EventsClass;
До удаления элемента управления будет выдан запрос на подтверждение выполняемого действия. При положительном ответе элемент управления будет удалён, при отрицательном - нет.
См. также: