IPrxDataIslandHeader.HierarchyIndent

Синтаксис

HierarchyIndent: Double;

Описание

Свойство HierarchyIndent определяет отступ в раскрывающейся иерархии. Для использования отступов необходимо свойство IPrxDataIslandHeaderCommon.AutoIndent установить в OnOption.

Пример

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

Report: IPrxReport;

DIs: IPrxDataIslands;

DI: IPrxDataIsland;

Prop: IPrxDataIslandProperties;

THead: IPrxDataIslandHeader;

Begin

MB := MetabaseClass.Active;

MObj := MB.ItemById("Report").Edit;

Report := MObj As IPrxReport;

DIs := Report.DataIslands;

DI := DIs.Item(0).Edit;

    Prop := DI.Properties;

    THead := Prop.TopHeader;

    THead.AutoIndent := TriState.OnOption;

    THead.HierarchyIndent := 4;

DI.Save;

MObj.Save;

End Sub Main;

После выполнения примера для столбцов первой области данных будет установлен отступ в раскрывающейся иерархии «4». Идентификатор регламентного отчета - «Report».

См. также:

IPrxDataIslandHeader