IEaxGridDimensionSettings.Detailing

Копировать пример

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Eax: IEaxAnalyzer;
    Prop: IEaxGridDimensionSettings;
    PivotDim: IDataAreaHeaderSettingsBase;
Begin
    // Получим экспресс-отчёт
    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;