EventOnBeforeSortEaxGrid (Args: IUiPrxEaxGridCancelEventArgs);
EventOnBeforeSortEaxGrid (Args: Prognoz.Platform.Interop.Report.UiPrxEaxGridCancelEventArgs)
Args. Параметр, позволяющий работать с параметрами события.
Метод EventOnBeforeSortEaxGrid реализует событие, происходящее до сортировки данных в аналитической области.
Метод позволяет переопределить системное событие, которое наступает после события ReportEvents.OnBeforeSortEaxGrid.
Для выполнения примера в репозитории предполагается наличие регламентного отчёта с подключенным модулем. В качестве обработчика событий должен быть указан подключенный модуль и класс Parent.
Добавьте ссылки на системные сборки: Express, Report, Ui.
Public Class EventsClass: Parent
Public Sub OnBeforeSortEaxGrid(EaxGrid: IEaxGrid; Var Cancel: Boolean);
Begin
//Вызов системного события, переопределенного в классе Parent
Inherited OnBeforeSortEaxGrid(EaxGrid, Cancel);
End Sub OnBeforeSortEaxGrid;
Public Sub OnAfterSortEaxGrid(EaxGrid: IEaxGrid);
Begin
//Вызов системного события, переопределенного в классе Parent
Inherited OnAfterSortEaxGrid(EaxGrid);
End Sub OnAfterSortEaxGrid;
End Class EventsClass;
Public Class Parent: ReportEvents
//Переопределение системного события EventOnBeforeSortEaxGrid
Public Sub EventOnBeforeSortEaxGrid(Args: IUiPrxEaxGridCancelEventArgs);
Begin
//Обработка системного события
WinApplication.InformationBox("Данные аналитической области будут отсортированы");
End Sub EventOnBeforeSortEaxGrid;
//Переопределение системного события EventOnAfterSortEaxGrid
Public Sub EventOnAfterSortEaxGrid(Args: IUiPrxEaxGridEventArgs);
Begin
//Обработка системного события
WinApplication.InformationBox("Данные аналитической области были отсортированы");
End Sub EventOnAfterSortEaxGrid;
End Class Parent;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Ui;
Public Class EventsClass: Parent
Public Override Sub OnBeforeSortEaxGrid(EaxGrid: EaxGrid; Var Cancel: Boolean);
Begin
//Вызов системного события, переопределенного в классе Parent
Inherited OnBeforeSortEaxGrid(EaxGrid, Var Cancel);
End Sub OnBeforeSortEaxGrid;
Public Override Sub OnAfterSortEaxGrid(EaxGrid: EaxGrid);
Begin
//Вызов системного события, переопределенного в классе Parent
Inherited OnAfterSortEaxGrid(EaxGrid);
End Sub OnAfterSortEaxGrid;
End Class;
Public Class Parent: PrxForeNetReportUserEventsClass
//Переопределение системного события EventOnBeforeSortEaxGrid
Public Override Sub EventOnBeforeSortEaxGrid(Args: UiPrxEaxGridCancelEventArgs);
Var
WinAppCls: WinApplicationClass = New WinApplicationClassClass();
Begin
//Обработка системного события
WinAppCls.InformationBox("Данные аналитической области будут отсортированы", Null);
End Sub EventOnBeforeSortEaxGrid;
//Переопределение системного события EventOnAfterSortEaxGrid
Public Override Sub EventOnAfterSortEaxGrid(Args: UiPrxEaxGridEventArgs);
Var
WinAppCls: WinApplicationClass = New WinApplicationClassClass();
Begin
//Обработка системного события
WinAppCls.InformationBox("Данные аналитической области были отсортированы", Null);
End Sub EventOnAfterSortEaxGrid;
End Class Parent;
В результате выполнения примера в регламентном отчёте перед сортировкой и после сортировки данных аналитической области будут выведены информационные сообщения.
См. также: