Report > Интерфейсы сборки Report > IPrxReportUserEvents > IPrxReportUserEvents.EventOnAfterAddFormulaIsland
Sub EventOnAfterAddFormulaIsland(Args: IUiPrxFormulaIslandEventArgs);
Begin
//набор операторов;
End Sub EventOnAfterAddFormulaIsland;
Sub EventOnAfterAddFormulaIsland(Args: Prognoz.Platform.Interop.Report.UiPrxFormulaIslandEventArgs);
Begin
//набор операторов;
End Sub EventOnAfterAddFormulaIsland;
Args. Параметр, позволяющий работать с параметрами события.
Метод EventOnAfterAddFormulaIsland реализует событие, которое наступает после добавления области формул.
Для реализации события, которое наступит после удаления области формул, используйте метод IPrxReportUserEvents.EventOnAfterDeleteFormulaIsland.
Для выполнения примера предполагается наличие регламентного отчета. Подключите модуль в регламентный отчет, в качестве обработчика событий выберите подключенный модуль и класс «EventsClass». В модуле подключите системные сборки: Metabase, Report, Ui.
Class EventsClass: ReportEvents
Public Sub OnAfterAddFormulaIsland(FormulaIsland : IPrxFormulaIsland);
Begin
WinApplication.InformationBox("Была добавлена область формул " + FormulaIsland.Id);
End Sub OnAfterAddFormulaIsland;
Public Sub OnAfterDeleteFormulaIsland(FormulaIsland : IPrxFormulaIsland);
Begin
WinApplication.InformationBox("Была удалена область формул " + FormulaIsland.Id);
End Sub OnAfterDeleteFormulaIsland;
End Class EventsClass;
При наступлении события будет выдано информационное сообщение.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Ui;
Public Class EventsClass: PrxForeNetReportUserEventsClass
Public Override Sub OnAfterAddFormulaIsland(FormulaIsland : IPrxFormulaIsland);
Var
WinAppCls: WinApplicationClass = New WinApplicationClassClass();
Begin
WinAppCls.InformationBox("Была добавлена область формул " + FormulaIsland.Id, Null);
End Sub OnAfterAddFormulaIsland;
Public Override Sub OnAfterDeleteFormulaIsland(FormulaIsland : IPrxFormulaIsland);
Var
WinAppCls: WinApplicationClass = New WinApplicationClassClass();
Begin
WinAppCls.InformationBox("Была удалена область формул " + FormulaIsland.Id, Null);
End Sub OnAfterDeleteFormulaIsland;
End Class EventsClass;
См. также:
Связанные записи
Требование