DimCalendarViewMode(Dimkey: Integer): EaxCalendarViewMode;
DimCalendarViewMode[Dimkey: uinteger]: Prognoz.Platform.Interop.Express.EaxCalendarViewMode;
Свойство DimCalendarViewMode определяет настройку режима отображения календарных измерений.
Для выполнения примера предполагается наличие экспресс-отчета с идентификатором «EXPRESS». В экспресс-отчете имеется источник данных, содержащий измерение с индексом «0». На форме предполагается наличие компонента Button с идентификатором «Button1».
Добавьте ссылки на системные сборки Metabase, Express и Dimensions.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Eax: IEaxAnalyzer;
dimI: IDimInstance;
Begin
//Получаем экспресс-отчет
Eax := MetabaseClass.Active.ItemById("EXPRESS").Edit As IEaxAnalyzer;
//Получаем данные календарного измерения
dimI := Eax.Pivot.Dimensions.Item(0).DimInstance;
//Задаем режим отображения календарного измерения
Eax.DataArea.Slices.Item(0).Properties.DimCalendarViewMode(dimI.Key) := EaxCalendarViewMode.Levels;
(Eax As IMetabaseObject).Save;
End Sub Button1OnClick;
В результате выполнения примера после нажатия кнопки для календарного измерения будет установлен режим отображения только по уровням.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Metabase;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
Eax: IEaxAnalyzer;
dimI: IDimInstance;
Begin
//Получаем экспресс-отчет
Eax := Self.Metabase.ItemById["EXPRESS"].Edit() As IEaxAnalyzer;
//Получаем данные календарного измерения
dimI := Eax.Pivot.Dimensions.Item[0].DimInstance;
//Задаем режим отображения календарного измерения
Eax.DataArea.Slices.Item[0].Properties.DimCalendarViewMode[dimI.Key] := EaxCalendarViewMode.ecvmLevels;
(Eax As IMetabaseObject).Save();
End Sub;
См. также: