01type
02  ITableInfo = interface(INamedItemInfo)
03    ['{3FC1998A-9031-4936-82B5-8CAA2219085E}']
04    function Get_FieldCount: Integer; safecall;
05    function Get_Field(Index: Integer): IFieldInfo; safecall;
06    function Get_PrimaryKey: IFieldInfo; safecall;
07    function Get_Uplink: IFieldInfo; safecall;
08    function Get_Parent: ITableInfo; safecall;
09    function Get_RootAvailable: WordBool; safecall;
10    property FieldCount: Integer read Get_FieldCount;
11    property Field[Index: Integer]: IFieldInfo read Get_Field;
12    property PrimaryKey: IFieldInfo read Get_PrimaryKey;
13    property Uplink: IFieldInfo read Get_Uplink;
14    property Parent: ITableInfo read Get_Parent;
15    property RootAvailable: WordBool read Get_RootAvailable;
16  end;