📄 adodb_tlb.pas
字号:
// *********************************************************************//
// DispIntf: Command15Disp
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000508-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Command15Disp = dispinterface
['{00000508-0000-0010-8000-00AA006D2EA4}']
property ActiveConnection: Connection15 readonly dispid 1610809344;
property CommandText: WideString readonly dispid 1610809347;
property CommandTimeout: Integer readonly dispid 1610809349;
property Prepared: WordBool readonly dispid 1610809351;
function Execute(out RecordsAffected: OleVariant; var Parameters: OleVariant; Options: Integer): Recordset15; dispid 1610809353;
function CreateParameter(const Name: WideString; Type_: DataTypeEnum;
Direction: ParameterDirectionEnum; Size: Integer; Value: OleVariant): _Parameter; dispid 1610809354;
property Parameters: Parameters readonly dispid 0;
property CommandType: CommandTypeEnum writeonly dispid 1610809356;
property Name: WideString readonly dispid 1610809358;
property Properties: Properties readonly dispid 500;
end;
// *********************************************************************//
// Interface: Connection15
// Flags: (4432) Hidden Dual OleAutomation Dispatchable
// GUID: {00000515-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Connection15 = interface(_ADO)
['{00000515-0000-0010-8000-00AA006D2EA4}']
function Get_ConnectionString: WideString; safecall;
procedure Set_ConnectionString(const pbstr: WideString); safecall;
function Get_CommandTimeout: Integer; safecall;
procedure Set_CommandTimeout(plTimeout: Integer); safecall;
function Get_ConnectionTimeout: Integer; safecall;
procedure Set_ConnectionTimeout(plTimeout: Integer); safecall;
function Get_Version: WideString; safecall;
procedure Close; safecall;
function Execute(const CommandText: WideString; out RecordsAffected: OleVariant;
Options: Integer): Recordset15; safecall;
function BeginTrans: Integer; safecall;
procedure CommitTrans; safecall;
procedure RollbackTrans; safecall;
procedure Open(const ConnectionString: WideString; const UserID: WideString;
const Password: WideString; Options: Integer); safecall;
function Get_Errors: Errors; safecall;
function Get_DefaultDatabase: WideString; safecall;
procedure Set_DefaultDatabase(const pbstr: WideString); safecall;
function Get_IsolationLevel: IsolationLevelEnum; safecall;
procedure Set_IsolationLevel(Level: IsolationLevelEnum); safecall;
function Get_Attributes: Integer; safecall;
procedure Set_Attributes(plAttr: Integer); safecall;
function Get_CursorLocation: CursorLocationEnum; safecall;
procedure Set_CursorLocation(plCursorLoc: CursorLocationEnum); safecall;
function Get_Mode: ConnectModeEnum; safecall;
procedure Set_Mode(plMode: ConnectModeEnum); safecall;
function Get_Provider: WideString; safecall;
procedure Set_Provider(const pbstr: WideString); safecall;
function Get_State: Integer; safecall;
function OpenSchema(Schema: SchemaEnum; Restrictions: OleVariant; SchemaID: OleVariant): Recordset15; safecall;
property ConnectionString: WideString read Get_ConnectionString write Set_ConnectionString;
property CommandTimeout: Integer read Get_CommandTimeout write Set_CommandTimeout;
property ConnectionTimeout: Integer read Get_ConnectionTimeout write Set_ConnectionTimeout;
property Version: WideString read Get_Version;
property Errors: Errors read Get_Errors;
property DefaultDatabase: WideString read Get_DefaultDatabase write Set_DefaultDatabase;
property IsolationLevel: IsolationLevelEnum read Get_IsolationLevel write Set_IsolationLevel;
property Attributes: Integer read Get_Attributes write Set_Attributes;
property CursorLocation: CursorLocationEnum read Get_CursorLocation write Set_CursorLocation;
property Mode: ConnectModeEnum read Get_Mode write Set_Mode;
property Provider: WideString read Get_Provider write Set_Provider;
property State: Integer read Get_State;
end;
// *********************************************************************//
// DispIntf: Connection15Disp
// Flags: (4432) Hidden Dual OleAutomation Dispatchable
// GUID: {00000515-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Connection15Disp = dispinterface
['{00000515-0000-0010-8000-00AA006D2EA4}']
property ConnectionString: WideString dispid 0;
property CommandTimeout: Integer dispid 2;
property ConnectionTimeout: Integer dispid 3;
property Version: WideString readonly dispid 4;
procedure Close; dispid 5;
function Execute(const CommandText: WideString; out RecordsAffected: OleVariant;
Options: Integer): Recordset15; dispid 6;
function BeginTrans: Integer; dispid 7;
procedure CommitTrans; dispid 8;
procedure RollbackTrans; dispid 9;
procedure Open(const ConnectionString: WideString; const UserID: WideString;
const Password: WideString; Options: Integer); dispid 10;
property Errors: Errors readonly dispid 11;
property DefaultDatabase: WideString dispid 12;
property IsolationLevel: IsolationLevelEnum dispid 13;
property Attributes: Integer dispid 14;
property CursorLocation: CursorLocationEnum dispid 15;
property Mode: ConnectModeEnum dispid 16;
property Provider: WideString dispid 17;
property State: Integer readonly dispid 18;
function OpenSchema(Schema: SchemaEnum; Restrictions: OleVariant; SchemaID: OleVariant): Recordset15; dispid 19;
property Properties: Properties readonly dispid 500;
end;
// *********************************************************************//
// Interface: _Connection
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00000550-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_Connection = interface(Connection15)
['{00000550-0000-0010-8000-00AA006D2EA4}']
procedure Cancel; safecall;
end;
// *********************************************************************//
// DispIntf: _ConnectionDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00000550-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
_ConnectionDisp = dispinterface
['{00000550-0000-0010-8000-00AA006D2EA4}']
procedure Cancel; dispid 21;
property ConnectionString: WideString dispid 0;
property CommandTimeout: Integer dispid 2;
property ConnectionTimeout: Integer dispid 3;
property Version: WideString readonly dispid 4;
procedure Close; dispid 5;
function Execute(const CommandText: WideString; out RecordsAffected: OleVariant;
Options: Integer): Recordset15; dispid 6;
function BeginTrans: Integer; dispid 7;
procedure CommitTrans; dispid 8;
procedure RollbackTrans; dispid 9;
procedure Open(const ConnectionString: WideString; const UserID: WideString;
const Password: WideString; Options: Integer); dispid 10;
property Errors: Errors readonly dispid 11;
property DefaultDatabase: WideString dispid 12;
property IsolationLevel: IsolationLevelEnum dispid 13;
property Attributes: Integer dispid 14;
property CursorLocation: CursorLocationEnum dispid 15;
property Mode: ConnectModeEnum dispid 16;
property Provider: WideString dispid 17;
property State: Integer readonly dispid 18;
function OpenSchema(Schema: SchemaEnum; Restrictions: OleVariant; SchemaID: OleVariant): Recordset15; dispid 19;
property Properties: Properties readonly dispid 500;
end;
// *********************************************************************//
// Interface: Recordset15
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000050E-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Recordset15 = interface(_ADO)
['{0000050E-0000-0010-8000-00AA006D2EA4}']
function Get_AbsolutePosition: PositionEnum; safecall;
procedure Set_AbsolutePosition(pl: PositionEnum); safecall;
procedure _Set_ActiveConnection(const pvar: IDispatch); safecall;
procedure Set_ActiveConnection(pvar: OleVariant); safecall;
function Get_ActiveConnection: OleVariant; safecall;
function Get_BOF: WordBool; safecall;
function Get_Bookmark: OleVariant; safecall;
procedure Set_Bookmark(pvBookmark: OleVariant); safecall;
function Get_CacheSize: Integer; safecall;
procedure Set_CacheSize(pl: Integer); safecall;
function Get_CursorType: CursorTypeEnum; safecall;
procedure Set_CursorType(plCursorType: CursorTypeEnum); safecall;
function Get_EOF: WordBool; safecall;
function Get_Fields: Fields15; safecall;
function Get_LockType: LockTypeEnum; safecall;
procedure Set_LockType(plLockType: LockTypeEnum); safecall;
function Get_MaxRecords: Integer; safecall;
procedure Set_MaxRecords(plMaxRecords: Integer); safecall;
function Get_RecordCount: Integer; safecall;
procedure _Set_Source(const pvSource: IDispatch); safecall;
procedure Set_Source(const pvSource: WideString); safecall;
function Get_Source: OleVariant; safecall;
procedure AddNew(FieldList: OleVariant; Values: OleVariant); safecall;
procedure CancelUpdate; safecall;
procedure Close; safecall;
procedure Delete(AffectRecords: AffectEnum); safecall;
function GetRows(Rows: Integer; Start: OleVariant; Fields: OleVariant): OleVariant; safecall;
procedure Move(NumRecords: Integer; Start: OleVariant); safecall;
procedure MoveNext; safecall;
procedure MovePrevious; safecall;
procedure MoveFirst; safecall;
procedure MoveLast; safecall;
procedure Open(Source: OleVariant; ActiveConnection: OleVariant; CursorType: CursorTypeEnum;
LockType: LockTypeEnum; Options: Integer); safecall;
procedure Requery(Options: Integer); safecall;
procedure _xResync(AffectRecords: AffectEnum); safecall;
procedure Update(Fields: OleVariant; Values: OleVariant); safecall;
function Get_AbsolutePage: PositionEnum; safecall;
procedure Set_AbsolutePage(pl: PositionEnum); safecall;
function Get_EditMode: EditModeEnum; safecall;
function Get_Filter: OleVariant; safecall;
procedure Set_Filter(Criteria: OleVariant); safecall;
function Get_PageCount: Integer; safecall;
function Get_PageSize: Integer; safecall;
procedure Set_PageSize(pl: Integer); safecall;
function Get_Sort: WideString; safecall;
procedure Set_Sort(const Criteria: WideString); safecall;
function Get_Status: Integer; safecall;
function Get_State: Integer; safecall;
function _xClone: Recordset15; safecall;
procedure UpdateBatch(AffectRecords: AffectEnum); safecall;
procedure CancelBatch(AffectRecords: AffectEnum); safecall;
function Get_CursorLocation: CursorLocationEnum; safecall;
procedure Set_CursorLocation(plCursorLoc: CursorLocationEnum); safecall;
function NextRecordset(out RecordsAffected: OleVariant): Recordset15; safecall;
function Supports(CursorOptions: CursorOptionEnum): WordBool; safecall;
function Get_Collect(Index: OleVariant): OleVariant; safecall;
procedure Set_Collect(Index: OleVariant; pvar: OleVariant); safecall;
function Get_MarshalOptions: MarshalOptionsEnum; safecall;
procedure Set_MarshalOptions(peMarshal: MarshalOptionsEnum); safecall;
procedure Find(const Criteria: WideString; SkipRecords: Integer;
SearchDirection: SearchDirectionEnum; Start: OleVariant); safecall;
property AbsolutePosition: PositionEnum read Get_AbsolutePosition write Set_AbsolutePosition;
property BOF: WordBool read Get_BOF;
property Bookmark: OleVariant read Get_Bookmark write Set_Bookmark;
property CacheSize: Integer read Get_CacheSize write Set_CacheSize;
property CursorType: CursorTypeEnum read Get_CursorType write Set_CursorType;
property EOF: WordBool read Get_EOF;
property Fields: Fields15 read Get_Fields;
property LockType: LockTypeEnum read Get_LockType write Set_LockType;
property MaxRecords: Integer read Get_MaxRecords write Set_MaxRecords;
property RecordCount: Integer read Get_RecordCount;
property AbsolutePage: PositionEnum read Get_AbsolutePage write Set_AbsolutePage;
property EditMode: EditModeEnum read Get_EditMode;
property Filter: OleVariant read Get_Filter write Set_Filter;
property PageCount: Integer read Get_PageCount;
property PageSize: Integer read Get_PageSize write Set_PageSize;
property Sort: WideString read Get_Sort write Set_Sort;
property Status: Integer read Get_Status;
property State: Integer read Get_State;
property CursorLocation: CursorLocationEnum read Get_CursorLocation write Set_CursorLocation;
property Collect[Index: OleVariant]: OleVariant read Get_Collect write Set_Collect;
property MarshalOptions: MarshalOptionsEnum read Get_MarshalOptions write Set_MarshalOptions;
end;
// *********************************************************************//
// DispIntf: Recordset15Disp
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000050E-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Recordset15Disp = dispinterface
['{0000050E-0000-0010-8000-00AA006D2EA4}']
property AbsolutePosition: PositionEnum dispid 1000;
function ActiveConnection: IDispatch; dispid 1001;
property BOF: WordBool readonly dispid 1002;
property Bookmark: OleVariant dispid 1003;
property CacheSize: Integer dispid 1004;
property CursorType: CursorTypeEnum dispid 1005;
property EOF: WordBool readonly dispid 1006;
property Fields: Fields15 readonly dispid 0;
property LockType: LockTypeEnum dispid 1008;
property MaxRecords: Integer dispid 1009;
property RecordCount: Integer readonly dispid 1010;
function Source: IDispatch; dispid 1011;
procedure AddNew(FieldList: OleVariant; Values: OleVariant); dispid 1012;
procedure CancelUpdate; dispid 1013;
procedure Close; dispid 1014;
procedure Delete(AffectRecords: AffectEnum); dispid 1015;
function GetRows(Rows: Integer; Start: OleVariant; Fields: OleVariant): OleVariant; dispid 1016;
procedure Move(NumRecords: Integer; Start: OleVariant); dispid 1017;
procedure MoveNext; dispid 1018;
procedure MovePrevious; dispid 1019;
procedure MoveFirst; dispid 1020;
procedure MoveLast; dispid 1021;
procedure Open(Source: OleVariant; ActiveConnection: OleVariant; CursorType: CursorTypeEnum;
LockType: LockTypeEnum; Options: Integer); dispid 1022;
procedure Requery(Options: Integer); dispid 1023;
procedure _xResync(AffectRecords: AffectEnum); dispid 1610809378;
procedure Update(Fields: OleVariant; Values: OleVariant); dispid 1025;
property AbsolutePage: PositionEnum dispid 1047;
property EditMode: EditModeEnum readonly dispid 1026;
property Filter: OleVariant dispid 1030;
property PageCount: Integer readonly dispid 1050;
property PageSize: Integer dispid 1048;
property Sort: WideString dispid 1031;
property Status: Integer readonly dispid 1029;
property State: Integer readonly dispid 1054;
function _xClone: Recordset15; dispid 1610809392;
procedure UpdateBatch(AffectRecords: AffectEnum); dispid 1035;
procedure CancelBatch(AffectRecords: AffectEnum); dispid 1049;
property CursorLocation: CursorLocationEnum dispid 1051;
function NextRecordset(out RecordsAffected: OleVariant): Recordset15; dispid 1052;
function Supports(CursorOptions: CursorOptionEnum): WordBool; dispid 1036;
property Collect[Index: OleVariant]: OleVariant dispid -8;
property MarshalOptions: MarshalOptionsEnum dispid 1053;
procedure Find(const Criteria: WideString; SkipRecords: Integer;
SearchDirection: SearchDirectionEnum; Start: OleVariant); dispid 1058;
property Properties: Properties readonly dispid 500;
end;
// *********************************************************************//
// Interface: Recordset20
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -