Slices: IPrxSlices;
Свойство Slices возвращает объект-родитель.
Sub Main;
Var
MB: IMetabase;
Report: IPrxReport;
DIs: IPrxDataIslands;
DI: IPrxDataIsland;
Slices: IPrxSlices
i: Integer;
Begin
MB := MetabaseClass.Active;
Report := MB.ItemById("Report").Bind As IPrxReport;
DIs := Report.DataIslands;
DI := DIs.Item(0);
Slices := DI.Slice.Slices;
i := Slices.Count;
End Sub Main;
После выполнения примера в переменной «i» будет содержаться количество срезов источника данных.
См. также: