📄 adox_tlb.pas
字号:
procedure Refresh; safecall;
property Count: Integer read Get_Count;
end;
// *********************************************************************//
// DispIntf: _CollectionDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000512-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_CollectionDisp = dispinterface
['{00000512-0000-0010-8000-00AA006D2EA4}']
property Count: Integer readonly dispid 1610743808;
function _NewEnum: IUnknown; dispid -4;
procedure Refresh; dispid 1610743810;
end;
// *********************************************************************//
// Interface: _DynaCollection
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000513-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_DynaCollection = interface(_Collection)
['{00000513-0000-0010-8000-00AA006D2EA4}']
procedure Append(const Object_: IDispatch); safecall;
procedure Delete(Item: OleVariant); safecall;
end;
// *********************************************************************//
// DispIntf: _DynaCollectionDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000513-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_DynaCollectionDisp = dispinterface
['{00000513-0000-0010-8000-00AA006D2EA4}']
procedure Append(const Object_: IDispatch); dispid 1610809344;
procedure Delete(Item: OleVariant); dispid 1610809345;
property Count: Integer readonly dispid 1610743808;
function _NewEnum: IUnknown; dispid -4;
procedure Refresh; dispid 1610743810;
end;
// *********************************************************************//
// Interface: _Catalog
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000603-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_Catalog = interface(IDispatch)
['{00000603-0000-0010-8000-00AA006D2EA4}']
function Get_Tables: Tables; safecall;
function Get_ActiveConnection: OleVariant; safecall;
procedure _Set_ActiveConnection(pVal: OleVariant); safecall;
procedure Set_ActiveConnection(const pVal: IDispatch); safecall;
function Get_Procedures: Procedures; safecall;
function Get_Views: Views; safecall;
function Get_Groups: Groups; safecall;
function Get_Users: Users; safecall;
function Create(const ConnectString: WideString): OleVariant; safecall;
function GetObjectOwner(const ObjectName: WideString; ObjectType: ObjectTypeEnum;
ObjectTypeId: OleVariant): WideString; safecall;
procedure SetObjectOwner(const ObjectName: WideString; ObjectType: ObjectTypeEnum;
const UserName: WideString; ObjectTypeId: OleVariant); safecall;
property Tables: Tables read Get_Tables;
property Procedures: Procedures read Get_Procedures;
property Views: Views read Get_Views;
property Groups: Groups read Get_Groups;
property Users: Users read Get_Users;
end;
// *********************************************************************//
// DispIntf: _CatalogDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000603-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_CatalogDisp = dispinterface
['{00000603-0000-0010-8000-00AA006D2EA4}']
property Tables: Tables readonly dispid 0;
function ActiveConnection: OleVariant; dispid 1;
property Procedures: Procedures readonly dispid 2;
property Views: Views readonly dispid 3;
property Groups: Groups readonly dispid 4;
property Users: Users readonly dispid 5;
function Create(const ConnectString: WideString): OleVariant; dispid 6;
function GetObjectOwner(const ObjectName: WideString; ObjectType: ObjectTypeEnum;
ObjectTypeId: OleVariant): WideString; dispid 7;
procedure SetObjectOwner(const ObjectName: WideString; ObjectType: ObjectTypeEnum;
const UserName: WideString; ObjectTypeId: OleVariant); dispid 8;
end;
// *********************************************************************//
// Interface: Tables
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000611-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Tables = interface(_Collection)
['{00000611-0000-0010-8000-00AA006D2EA4}']
function Get_Item(Item: OleVariant): Table; safecall;
procedure Append(Item: OleVariant); safecall;
procedure Delete(Item: OleVariant); safecall;
property Item[Item: OleVariant]: Table read Get_Item; default;
end;
// *********************************************************************//
// DispIntf: TablesDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000611-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
TablesDisp = dispinterface
['{00000611-0000-0010-8000-00AA006D2EA4}']
property Item[Item: OleVariant]: Table readonly dispid 0; default;
procedure Append(Item: OleVariant); dispid 1610809345;
procedure Delete(Item: OleVariant); dispid 1610809346;
property Count: Integer readonly dispid 1610743808;
function _NewEnum: IUnknown; dispid -4;
procedure Refresh; dispid 1610743810;
end;
// *********************************************************************//
// Interface: _Table
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000610-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_Table = interface(IDispatch)
['{00000610-0000-0010-8000-00AA006D2EA4}']
function Get_Columns: Columns; safecall;
function Get_Name: WideString; safecall;
procedure Set_Name(const pVal: WideString); safecall;
function Get_Type_: WideString; safecall;
function Get_Indexes: Indexes; safecall;
function Get_Keys: Keys; safecall;
function Get_Properties: Properties; safecall;
function Get_DateCreated: OleVariant; safecall;
function Get_DateModified: OleVariant; safecall;
function Get_ParentCatalog: _Catalog; safecall;
procedure _Set_ParentCatalog(const ppvObject: _Catalog); safecall;
procedure Set_ParentCatalog(const ppvObject: _Catalog); safecall;
property Columns: Columns read Get_Columns;
property Name: WideString read Get_Name write Set_Name;
property Type_: WideString read Get_Type_;
property Indexes: Indexes read Get_Indexes;
property Keys: Keys read Get_Keys;
property Properties: Properties read Get_Properties;
property DateCreated: OleVariant read Get_DateCreated;
property DateModified: OleVariant read Get_DateModified;
property ParentCatalog: _Catalog read Get_ParentCatalog write _Set_ParentCatalog;
end;
// *********************************************************************//
// DispIntf: _TableDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000610-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_TableDisp = dispinterface
['{00000610-0000-0010-8000-00AA006D2EA4}']
property Columns: Columns readonly dispid 0;
property Name: WideString dispid 1;
property Type_: WideString readonly dispid 2;
property Indexes: Indexes readonly dispid 3;
property Keys: Keys readonly dispid 4;
property Properties: Properties readonly dispid 5;
property DateCreated: OleVariant readonly dispid 6;
property DateModified: OleVariant readonly dispid 7;
property ParentCatalog: _Catalog dispid 8;
end;
// *********************************************************************//
// Interface: Columns
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000061D-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Columns = interface(_Collection)
['{0000061D-0000-0010-8000-00AA006D2EA4}']
function Get_Item(Item: OleVariant): Column; safecall;
procedure Append(Item: OleVariant; Type_: DataTypeEnum; DefinedSize: Integer); safecall;
procedure Delete(Item: OleVariant); safecall;
property Item[Item: OleVariant]: Column read Get_Item; default;
end;
// *********************************************************************//
// DispIntf: ColumnsDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000061D-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
ColumnsDisp = dispinterface
['{0000061D-0000-0010-8000-00AA006D2EA4}']
property Item[Item: OleVariant]: Column readonly dispid 0; default;
procedure Append(Item: OleVariant; Type_: DataTypeEnum; DefinedSize: Integer); dispid 1610809345;
procedure Delete(Item: OleVariant); dispid 1610809346;
property Count: Integer readonly dispid 1610743808;
function _NewEnum: IUnknown; dispid -4;
procedure Refresh; dispid 1610743810;
end;
// *********************************************************************//
// Interface: _Column
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000061C-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_Column = interface(IDispatch)
['{0000061C-0000-0010-8000-00AA006D2EA4}']
function Get_Name: WideString; safecall;
procedure Set_Name(const pVal: WideString); safecall;
function Get_Attributes: ColumnAttributesEnum; safecall;
procedure Set_Attributes(pVal: ColumnAttributesEnum); safecall;
function Get_DefinedSize: Integer; safecall;
procedure Set_DefinedSize(pVal: Integer); safecall;
function Get_NumericScale: Byte; safecall;
procedure Set_NumericScale(pVal: Byte); safecall;
function Get_Precision: Integer; safecall;
procedure Set_Precision(pVal: Integer); safecall;
function Get_RelatedColumn: WideString; safecall;
procedure Set_RelatedColumn(const pVal: WideString); safecall;
function Get_SortOrder: SortOrderEnum; safecall;
procedure Set_SortOrder(pVal: SortOrderEnum); safecall;
function Get_Type_: DataTypeEnum; safecall;
procedure Set_Type_(pVal: DataTypeEnum); safecall;
function Get_Properties: Properties; safecall;
function Get_ParentCatalog: _Catalog; safecall;
procedure _Set_ParentCatalog(const ppvObject: _Catalog); safecall;
procedure Set_ParentCatalog(const ppvObject: _Catalog); safecall;
property Name: WideString read Get_Name write Set_Name;
property Attributes: ColumnAttributesEnum read Get_Attributes write Set_Attributes;
property DefinedSize: Integer read Get_DefinedSize write Set_DefinedSize;
property NumericScale: Byte read Get_NumericScale write Set_NumericScale;
property Precision: Integer read Get_Precision write Set_Precision;
property RelatedColumn: WideString read Get_RelatedColumn write Set_RelatedColumn;
property SortOrder: SortOrderEnum read Get_SortOrder write Set_SortOrder;
property Type_: DataTypeEnum read Get_Type_ write Set_Type_;
property Properties: Properties read Get_Properties;
property ParentCatalog: _Catalog read Get_ParentCatalog write _Set_ParentCatalog;
end;
// *********************************************************************//
// DispIntf: _ColumnDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000061C-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_ColumnDisp = dispinterface
['{0000061C-0000-0010-8000-00AA006D2EA4}']
property Name: WideString dispid 0;
property Attributes: ColumnAttributesEnum dispid 1;
property DefinedSize: Integer dispid 3;
property NumericScale: Byte dispid 4;
property Precision: Integer dispid 5;
property RelatedColumn: WideString dispid 6;
property SortOrder: SortOrderEnum dispid 7;
property Type_: DataTypeEnum dispid 8;
property Properties: Properties readonly dispid 9;
property ParentCatalog: _Catalog dispid 10;
end;
// *********************************************************************//
// Interface: Properties
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000504-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Properties = interface(_Collection)
['{00000504-0000-0010-8000-00AA006D2EA4}']
function Get_Item(Item: OleVariant): Property_; safecall;
property Item[Item: OleVariant]: Property_ read Get_Item; default;
end;
// *********************************************************************//
// DispIntf: PropertiesDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000504-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
PropertiesDisp = dispinterface
['{00000504-0000-0010-8000-00AA006D2EA4}']
property Item[Item: OleVariant]: Property_ readonly dispid 0; default;
property Count: Integer readonly dispid 1610743808;
function _NewEnum: IUnknown; dispid -4;
procedure Refresh; dispid 1610743810;
end;
// *********************************************************************//
// Interface: Property_
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000503-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Property_ = interface(IDispatch)
['{00000503-0000-0010-8000-00AA006D2EA4}']
function Get_Value: OleVariant; safecall;
procedure Set_Value(pVal: OleVariant); safecall;
function Get_Name: WideString; safecall;
function Get_Type_: DataTypeEnum; safecall;
function Get_Attributes: Integer; safecall;
procedure Set_Attributes(plAttributes: Integer); safecall;
property Value: OleVariant read Get_Value write Set_Value;
property Name: WideString read Get_Name;
property Type_: DataTypeEnum read Get_Type_;
property Attributes: Integer read Get_Attributes write Set_Attributes;
end;
// *********************************************************************//
// DispIntf: Property_Disp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000503-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Property_Disp = dispinterface
['{00000503-0000-0010-8000-00AA006D2EA4}']
property Value: OleVariant dispid 0;
property Name: WideString readonly dispid 1;
property Type_: DataTypeEnum readonly dispid 2;
property Attributes: Integer dispid 3;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -