📄 adox_tlb.pas
字号:
end;
// *********************************************************************//
// Interface: Indexes
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000620-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Indexes = interface(_Collection)
['{00000620-0000-0010-8000-00AA006D2EA4}']
function Get_Item(Item: OleVariant): Index; safecall;
procedure Append(Item: OleVariant; Columns: OleVariant); safecall;
procedure Delete(Item: OleVariant); safecall;
property Item[Item: OleVariant]: Index read Get_Item; default;
end;
// *********************************************************************//
// DispIntf: IndexesDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000620-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
IndexesDisp = dispinterface
['{00000620-0000-0010-8000-00AA006D2EA4}']
property Item[Item: OleVariant]: Index readonly dispid 0; default;
procedure Append(Item: OleVariant; Columns: 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: _Index
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000061F-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_Index = interface(IDispatch)
['{0000061F-0000-0010-8000-00AA006D2EA4}']
function Get_Name: WideString; safecall;
procedure Set_Name(const pVal: WideString); safecall;
function Get_Clustered: WordBool; safecall;
procedure Set_Clustered(pVal: WordBool); safecall;
function Get_IndexNulls: AllowNullsEnum; safecall;
procedure Set_IndexNulls(pVal: AllowNullsEnum); safecall;
function Get_PrimaryKey: WordBool; safecall;
procedure Set_PrimaryKey(pVal: WordBool); safecall;
function Get_Unique: WordBool; safecall;
procedure Set_Unique(pVal: WordBool); safecall;
function Get_Columns: Columns; safecall;
function Get_Properties: Properties; safecall;
property Name: WideString read Get_Name write Set_Name;
property Clustered: WordBool read Get_Clustered write Set_Clustered;
property IndexNulls: AllowNullsEnum read Get_IndexNulls write Set_IndexNulls;
property PrimaryKey: WordBool read Get_PrimaryKey write Set_PrimaryKey;
property Unique: WordBool read Get_Unique write Set_Unique;
property Columns: Columns read Get_Columns;
property Properties: Properties read Get_Properties;
end;
// *********************************************************************//
// DispIntf: _IndexDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000061F-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_IndexDisp = dispinterface
['{0000061F-0000-0010-8000-00AA006D2EA4}']
property Name: WideString dispid 0;
property Clustered: WordBool dispid 1;
property IndexNulls: AllowNullsEnum dispid 2;
property PrimaryKey: WordBool dispid 3;
property Unique: WordBool dispid 4;
property Columns: Columns readonly dispid 5;
property Properties: Properties readonly dispid 6;
end;
// *********************************************************************//
// Interface: Keys
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000623-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Keys = interface(_Collection)
['{00000623-0000-0010-8000-00AA006D2EA4}']
function Get_Item(Item: OleVariant): Key; safecall;
procedure Append(Item: OleVariant; Type_: KeyTypeEnum; Column: OleVariant;
const RelatedTable: WideString; const RelatedColumn: WideString); safecall;
procedure Delete(Item: OleVariant); safecall;
property Item[Item: OleVariant]: Key read Get_Item; default;
end;
// *********************************************************************//
// DispIntf: KeysDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000623-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
KeysDisp = dispinterface
['{00000623-0000-0010-8000-00AA006D2EA4}']
property Item[Item: OleVariant]: Key readonly dispid 0; default;
procedure Append(Item: OleVariant; Type_: KeyTypeEnum; Column: OleVariant;
const RelatedTable: WideString; const RelatedColumn: WideString); 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: _Key
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000622-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_Key = interface(IDispatch)
['{00000622-0000-0010-8000-00AA006D2EA4}']
function Get_Name: WideString; safecall;
procedure Set_Name(const pVal: WideString); safecall;
function Get_DeleteRule: RuleEnum; safecall;
procedure Set_DeleteRule(pVal: RuleEnum); safecall;
function Get_Type_: KeyTypeEnum; safecall;
procedure Set_Type_(pVal: KeyTypeEnum); safecall;
function Get_RelatedTable: WideString; safecall;
procedure Set_RelatedTable(const pVal: WideString); safecall;
function Get_UpdateRule: RuleEnum; safecall;
procedure Set_UpdateRule(pVal: RuleEnum); safecall;
function Get_Columns: Columns; safecall;
property Name: WideString read Get_Name write Set_Name;
property DeleteRule: RuleEnum read Get_DeleteRule write Set_DeleteRule;
property Type_: KeyTypeEnum read Get_Type_ write Set_Type_;
property RelatedTable: WideString read Get_RelatedTable write Set_RelatedTable;
property UpdateRule: RuleEnum read Get_UpdateRule write Set_UpdateRule;
property Columns: Columns read Get_Columns;
end;
// *********************************************************************//
// DispIntf: _KeyDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000622-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_KeyDisp = dispinterface
['{00000622-0000-0010-8000-00AA006D2EA4}']
property Name: WideString dispid 0;
property DeleteRule: RuleEnum dispid 1;
property Type_: KeyTypeEnum dispid 2;
property RelatedTable: WideString dispid 3;
property UpdateRule: RuleEnum dispid 4;
property Columns: Columns readonly dispid 5;
end;
// *********************************************************************//
// Interface: Procedures
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000626-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Procedures = interface(_Collection)
['{00000626-0000-0010-8000-00AA006D2EA4}']
function Get_Item(Item: OleVariant): Procedure_; safecall;
procedure Append(const Name: WideString; const Command: IDispatch); safecall;
procedure Delete(Item: OleVariant); safecall;
property Item[Item: OleVariant]: Procedure_ read Get_Item; default;
end;
// *********************************************************************//
// DispIntf: ProceduresDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000626-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
ProceduresDisp = dispinterface
['{00000626-0000-0010-8000-00AA006D2EA4}']
property Item[Item: OleVariant]: Procedure_ readonly dispid 0; default;
procedure Append(const Name: WideString; const Command: IDispatch); 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: Procedure_
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000625-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Procedure_ = interface(IDispatch)
['{00000625-0000-0010-8000-00AA006D2EA4}']
function Get_Command: OleVariant; safecall;
procedure _Set_Command(pVar: OleVariant); safecall;
procedure Set_Command(const pVar: IDispatch); safecall;
function Get_Name: WideString; safecall;
function Get_DateCreated: OleVariant; safecall;
function Get_DateModified: OleVariant; safecall;
property Name: WideString read Get_Name;
property DateCreated: OleVariant read Get_DateCreated;
property DateModified: OleVariant read Get_DateModified;
end;
// *********************************************************************//
// DispIntf: Procedure_Disp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000625-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Procedure_Disp = dispinterface
['{00000625-0000-0010-8000-00AA006D2EA4}']
function Command: OleVariant; dispid 0;
property Name: WideString readonly dispid 1;
property DateCreated: OleVariant readonly dispid 2;
property DateModified: OleVariant readonly dispid 3;
end;
// *********************************************************************//
// Interface: Views
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000614-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Views = interface(_Collection)
['{00000614-0000-0010-8000-00AA006D2EA4}']
function Get_Item(Item: OleVariant): View; safecall;
procedure Append(const Name: WideString; const Command: IDispatch); safecall;
procedure Delete(Item: OleVariant); safecall;
property Item[Item: OleVariant]: View read Get_Item; default;
end;
// *********************************************************************//
// DispIntf: ViewsDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000614-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
ViewsDisp = dispinterface
['{00000614-0000-0010-8000-00AA006D2EA4}']
property Item[Item: OleVariant]: View readonly dispid 0; default;
procedure Append(const Name: WideString; const Command: IDispatch); 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: View
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000613-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
View = interface(IDispatch)
['{00000613-0000-0010-8000-00AA006D2EA4}']
function Get_Command: OleVariant; safecall;
procedure _Set_Command(pVal: OleVariant); safecall;
procedure Set_Command(const pVal: IDispatch); safecall;
function Get_Name: WideString; safecall;
function Get_DateCreated: OleVariant; safecall;
function Get_DateModified: OleVariant; safecall;
property Name: WideString read Get_Name;
property DateCreated: OleVariant read Get_DateCreated;
property DateModified: OleVariant read Get_DateModified;
end;
// *********************************************************************//
// DispIntf: ViewDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000613-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
ViewDisp = dispinterface
['{00000613-0000-0010-8000-00AA006D2EA4}']
function Command: OleVariant; dispid 0;
property Name: WideString readonly dispid 1;
property DateCreated: OleVariant readonly dispid 2;
property DateModified: OleVariant readonly dispid 3;
end;
// *********************************************************************//
// Interface: Groups
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000617-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Groups = interface(_Collection)
['{00000617-0000-0010-8000-00AA006D2EA4}']
function Get_Item(Item: OleVariant): Group; safecall;
procedure Append(Item: OleVariant); safecall;
procedure Delete(Item: OleVariant); safecall;
property Item[Item: OleVariant]: Group read Get_Item; default;
end;
// *********************************************************************//
// DispIntf: GroupsDisp
// Flags: (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000617-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
GroupsDisp = dispinterface
['{00000617-0000-0010-8000-00AA006D2EA4}']
property Item[Item: OleVariant]: Group 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: _Group25
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000616-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_Group25 = interface(IDispatch)
['{00000616-0000-0010-8000-00AA006D2EA4}']
function Get_Name: WideString; safecall;
procedure Set_Name(const pVal: WideString); safecall;
function GetPermissions(Name: OleVariant; ObjectType: ObjectTypeEnum; ObjectTypeId: OleVariant): RightsEnum; safecall;
procedure SetPermissions(Name: OleVariant; ObjectType: ObjectTypeEnum; Action: ActionEnum;
Rights: RightsEnum; Inherit: InheritTypeEnum; ObjectTypeId: OleVariant); safecall;
function Get_Users: Users; safecall;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -