Report > Report Assembly Interfaces > IPrxTableIsland > IPrxTableIsland.TableIslands
TableIslands : IPrxTableIslands;
The TableIslands property returns the collection of relational data areas.
Sub UserProc;
Var
MB: IMetabase;
Report: IPrxReport;
TabIs: IPrxTableIslands;
TI: IPrxTableIsland;
Count: Integer;
Begin
MB := MetabaseClass.Active;
Report := MB.ItemById("REPORT").Bind As IPrxReport;
TabIs := Report.TableIslands;
TI := TabIs.Item(0);
Count := TI.TableIslands.Count;
Debug.WriteLine(Count.ToString);
End Sub UserProc;
After executing the example console window displays the number of relational data areas in the collection.
See also: