EventOnBeforeDeleteControl(Args: IUiPrxControlCancelEventArgs);
Args. Параметр, позволяющий работать с параметрами события.
Метод EventOnBeforeDeleteControl реализует событие, происходящее перед удалением элемента управления.
Для выполнения примера предполагается наличие регламентного отчета, в котором содержится элемент управления. Подключите модуль в регламентный отчет, в качестве обработчика событий выберите подключенный модуль и класс EventsClass. В модуле подключите системные сборки: Report, Ui.
Class EventsClass: ReportEvents
// Работа с элементами управления:
Sub EventOnBeforeDeleteControl(Args: IUiPrxControlCancelEventArgs);
Begin
If Not WinApplication.ConfirmationBox("Удалить элемент управления?") Then
Args.Cancel := True;
End If;
End Sub EventOnBeforeDeleteControl;
End Class EventsClass;
При удалении элемента управления в регламентном отчете будет выдан запрос на подтверждение выполняемого действия. При положительном ответе элемент управления будет удалён, при отрицательном - нет.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Ui;
Public Class EventsClass: PrxForeNetReportUserEventsClass
// Работа с элементами управления:
Public Override Sub EventOnBeforeDeleteControl(Args: Prognoz.Platform.Interop.Report.UiPrxControlCancelEventArgs);
Var
WinAppCls: WinApplicationClass = New WinApplicationClassClass();
Begin
If Not WinAppCls.ConfirmationBox("Удалить элемент управления?", Null) Then
Args.Cancel := True;
End If;
End Sub EventOnBeforeDeleteControl;
End Class EventsClass;
См. также: