📄 adodb_tlb.pas
字号:
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): _Recordset; 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: Fields; 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: _Recordset; 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): _Recordset; 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: Fields 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: Fields 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: _Recordset; dispid 1610809392;
procedure UpdateBatch(AffectRecords: AffectEnum); dispid 1035;
procedure CancelBatch(AffectRecords: AffectEnum); dispid 1049;
property CursorLocation: CursorLocationEnum dispid 1051;
function NextRecordset(out RecordsAffected: OleVariant): _Recordset; 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
// GUID: {0000054F-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Recordset20 = interface(Recordset15)
['{0000054F-0000-0010-8000-00AA006D2EA4}']
procedure Cancel; safecall;
function Get_DataSource: IUnknown; safecall;
procedure Set_DataSource(const ppunkDataSource: IUnknown); safecall;
procedure _xSave(const FileName: WideString; PersistFormat: PersistFormatEnum); safecall;
function Get_ActiveCommand: IDispatch; safecall;
procedure Set_StayInSync(pbStayInSync: WordBool); safecall;
function Get_StayInSync: WordBool; safecall;
function GetString(StringFormat: StringFormatEnum; NumRows: Integer;
const ColumnDelimeter: WideString; const RowDelimeter: WideString;
const NullExpr: WideString): WideString; safecall;
function Get_DataMember: WideString; safecall;
procedure Set_DataMember(const pbstrDataMember: WideString); safecall;
function CompareBookmarks(Bookmark1: OleVariant; Bookmark2: OleVariant): CompareEnum; safecall;
function Clone(LockType: LockTypeEnum): _Recordset; safecall;
procedure Resync(AffectRecords: AffectEnum; ResyncValues: ResyncEnum); safecall;
property DataSource: IUnknown read Get_DataSource write Set_DataSource;
property ActiveCommand: IDispatch read Get_ActiveCommand;
property StayInSync: WordBool read Get_StayInSync write Set_StayInSync;
property DataMember: WideString read Get_DataMember write Set_DataMember;
end;
// *********************************************************************//
// DispIntf: Recordset20Disp
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {0000054F-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Recordset20Disp = dispinterface
['{0000054F-0000-0010-8000-00AA006D2EA4}']
procedure Cancel; dispid 1055;
property DataSource: IUnknown dispid 1056;
procedure _xSave(const FileName: WideString; PersistFormat: PersistFormatEnum); dispid 1610874883;
property ActiveCommand: IDispatch readonly dispid 1061;
property StayInSync: WordBool dispid 1063;
function GetString(StringFormat: StringFormatEnum; NumRows: Integer;
const ColumnDelimeter: WideString; const RowDelimeter: WideString;
const NullExpr: WideString): WideString; dispid 1062;
property DataMember: WideString dispid 1064;
function CompareBookmarks(Bookmark1: OleVariant; Bookmark2: OleVariant): CompareEnum; dispid 1065;
function Clone(LockType: LockTypeEnum): _Recordset; dispid 1034;
procedure Resync(AffectRecords: AffectEnum; ResyncValues: ResyncEnum); dispid 1024;
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: Fields 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: _Recordset; dispid 1610809392;
procedure UpdateBatch(AffectRecords: AffectEnum); dispid 1035;
procedure CancelBatch(AffectRecords: AffectEnum); dispid 1049;
property CursorLocation: CursorLocationEnum dispid 1051;
function NextRecordset(out RecordsAffected: OleVariant): _Recordset; 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: Recordset21
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000555-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Recordset21 = interface(Recordset20)
['{00000555-0000-0010-8000-00AA006D2EA4}']
procedure Seek(KeyValues: OleVariant; SeekOption: SeekEnum); safecall;
procedure Set_Index(const pbstrIndex: WideString); safecall;
function Get_Index: WideString; safecall;
property Index: WideString read Get_Index write Set_Index;
end;
// *********************************************************************//
// DispIntf: Recordset21Disp
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {00000555-0000-0010-8000-00AA006D2EA4}
// *********************************************************************//
Recordset21Disp = dispinterface
['{00000555-0000-0010-8000-00AA006D2EA4}']
procedure Seek(KeyValues: OleVariant; SeekOption: SeekEnum); dispid 1066;
property Index: WideString dispid 1067;
procedure Cancel; dispid 1055;
property DataSource: IUnknown dispid 1056;
procedure _xSave(const FileName: WideString; PersistFormat: PersistFormatEnum); dispid 1610874883;
property ActiveCommand: IDispatch readonly dispid 1061;
property StayInSync: WordBool dispid 1063;
function GetString(StringFormat: StringFormatEnum; NumRows: Integer;
const ColumnDelimeter: WideString; const RowDelimeter: WideString;
const NullExpr: WideString): WideString; dispid 1062;
property DataMember: WideString dispid 1064;
function CompareBookmarks(Bookmark1: OleVariant; Bookmark2: OleVariant): CompareEnum; dispid 1065;
function Clone(LockType: LockTypeEnum): _Recordset; dispid 1034;
procedure Resync(AffectRecords: AffectEnum; ResyncValues: ResyncEnum); dispid 1024;
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: Fields 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⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -