HierarchyIndent: Double;
The HierarchyIndent property determines indent in a pop-up hierarchy. To use indents, set the IPrxDataIslandHeaderCommon.AutoIndent property to 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;
After executing the example the indent equal to 4 is set in the pop-up hierarchy for columns of the first data area. The identifier of the regular report - Report.
See also: