Express > Интерфейсы сборки Express > IEaxGridDimensionSettings > IEaxGridDimensionSettings.Detailing
Detailing: TriState;
Detailing: TriState;
Свойство Detailing определяет, будет ли использоваться детализация данных.
Для получения признака того, используется ли детализация данных, используйте свойство IEaxGridDimensionSettings.IsDetailing.
Для выполнения примера разместите на форме компоненты Button и Label с идентификаторами «Button1», «Label1» соответственно.
Добавьте ссылки на системные сборки: Express, Metabase, Pivot, Forms, ForeSystem (для Fore.NET).
Пример является обработчиком события OnClick для компонента «Button1».
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Eax: IEaxAnalyzer;
Prop: IEaxGridDimensionSettings;
PivotDim: IDataAreaHeaderSettingsBase;
Begin
// Откроем экспресс-отчёт с ключом 71208
Eax := MetabaseClass.Active.Item(71208).Edit As IEaxAnalyzer;
// Найдем измерение источника данных с ключом 10127
PivotDim := Eax.Pivot.Dimensions.FindByKey(10127) As IDataAreaHeaderSettingsBase;
// Проверим признак детализации данных
Prop := Eax.Grid.ViewSettings.GetViewSettings(PivotDim) As IEaxGridDimensionSettings;
If Prop.IsDetailing = False Then
// Включим детализацию данных, если она отключена
Prop.Detailing := TriState.OnOption;
Label1.Text := "Детализация данных включена";
Else
// Отключим детализацию данных, если она включена
Prop.Detailing := TriState.OffOption;
Label1.Text := "Детализация данных выключена";
End If;
(Eax As IMetabaseObject).Save;
End Sub Button1OnClick;
При нажатии на кнопку «Button1» в компоненте «Label1» будет отображено состояние детализации данных.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Pivot;
Imports Prognoz.Platform.Interop.ForeSystem;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs;);
Var
MB: IMetabase;
Eax: IEaxAnalyzer;
Prop: IEaxGridDimensionSettings;
PivotDim: IDataAreaHeaderSettingsBase;
Begin
// Откроем экспресс-отчёт с ключом 71208
MB := Self.Metabase;
Eax := MB.Item[71208].Edit() As IEaxAnalyzer;
// Найдем измерение источника данных с ключом 10127
PivotDim := Eax.Pivot.Dimensions.FindByKey(10127) As IDataAreaHeaderSettingsBase;
// Проверим признак детализации данных
Prop := Eax.Grid.ViewSettings.GetViewSettings[PivotDim] As IEaxGridDimensionSettings;
If Prop.IsDetailing = False Then
// Включим детализацию данных, если она отключена
Prop.Detailing := TriState.tsOnOption;
Label1.Text := "Детализация данных включена";
Else
// Отключим детализацию данных, если она включена
Prop.Detailing := TriState.tsOffOption;
Label1.Text := "Детализация данных выключена";
End If;
(Eax As IMetabaseObject).Save();
End Sub;
См. также: