⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 devart.sdac.oledbintf.pas

📁 devent UniDAC 2.003 include sources
💻 PAS
📖 第 1 页 / 共 4 页
字号:
🔍
1234 
      const riid: TGUID;
      pParams: PDBPARAMS;
      [Out, MarshalAs(UnmanagedType.I4)]
      out pcRowsAffected: Integer;
      [Out, MarshalAs(UnmanagedType.Interface)]
      out ppRowset: IUnknown): HResult;
    [PreserveSig]
    function GetDBSession(
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const riid: TGUID;
      [Out, MarshalAs(UnmanagedType.IUnknown)]
      out ppSession: IUnknown): HResult;

    [PreserveSig]
    function GetCommandText( // WANING! System.Data.Common.UnsafeNativeMethods.GetCommandText has no parameters!
      [MarshalAs(UnmanagedType.LPStruct)]
      var pguidDialect: TGUID;
      out ppwszCommand: IntPtr): HResult;
    [PreserveSig]
   function SetCommandText(
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const rguidDialect: TGUID;
      [In, MarshalAs(UnmanagedType.LPWStr)]
      const pwszCommand: string): HResult;
  end;

// *********************************************************************//
// Interface: ICommandWithParameters
// GUID:      {0C733A64-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A64-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  ICommandWithParameters = interface
    [PreserveSig]
    function GetParameterInfo(
      [Out, MarshalAs(UnmanagedType.I4)]
      var pcParams: UINT32;
      out prgParamInfo: PDBPARAMINFO;
      ppNamesBuffer: PPOleStr): HResult;
    [PreserveSig]
    function MapParameterNames(
      cParamNames: UINT;
      rgParamNames: POleStrList;
      rgParamOrdinals: PUintArray): HResult;
    [PreserveSig]
    function SetParameterInfo(
      cParams: UINT;
      rgParamOrdinals: PUintArray;
      rgParamBindInfo: PDBParamBindInfoArray): HResult;
  end;

// *********************************************************************//
// Interface: IColumnsRowset
// GUID:      {0C733A10-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A10-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IColumnsRowset = interface
    [PreserveSig]
    function GetAvailableColumns(var pcOptColumns: UINT;
      var prgOptColumns: PDBID): HResult;
    [PreserveSig]
    function GetColumnsRowset(
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const punkOuter: IUnknown;
      cOptColumns: UINT;
      rgOptColumns: PDBIDArray;
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const riid: TGUID;
      cPropertySets: UINT;
      rgPropertySets: PDBPropSetArray;
      [Out, MarshalAs(UnmanagedType.IUnknown)]
      out pColRowset: IUnknown): HResult;
  end;

// *********************************************************************//
// Interface: IColumnsInfo
// GUID:      {0C733A11-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A11-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IColumnsInfo = interface
    [PreserveSig]
    function GetColumnInfo(var pcColumns: UINT; out prgInfo: PDBColumnInfo;
      out ppStringsBuffer: IntPtr): HResult;
    [PreserveSig]
    function MapColumnIDs(cColumnIDs: UINT; rgColumnIDs: PDBIDArray;
      rgColumns: PUintArray): HResult;
  end;

// *********************************************************************//
// Interface: IDBCreateCommand
// GUID:      {0C733A1D-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A1D-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDBCreateCommand = interface
    [PreserveSig]
    function CreateCommand(
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const punkOuter: IUnknown;
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const riid: TGUID;
      [Out, MarshalAs(UnmanagedType.IUnknown)]
      out ppCommand: IUnknown): HResult;
  end;

// *********************************************************************//
// Interface: IDBCreateSession
// GUID:      {0C733A5D-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A5D-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDBCreateSession = interface
    [PreserveSig]
    function CreateSession(
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const punkOuter: IUnknown;
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const riid: TGUID;
      [Out, MarshalAs(UnmanagedType.IUnknown)]
      out ppDBSession: IUnknown): HResult;
  end;

// *********************************************************************//
// Interface: ISourcesRowset
// GUID:      {0C733A1E-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A1E-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  ISourcesRowset = interface
    [PreserveSig]
    function GetSourcesRowset(
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const punkOuter: IUnknown;
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const riid: TGUID;
      cPropertySets: UINT;
      rgProperties: PDBPropSetArray;
      [Out, MarshalAs(UnmanagedType.IUnknown)]
      out ppSourcesRowset: IUnknown): HResult;
  end;

// *********************************************************************//
// Interface: IDBProperties
// GUID:      {0C733A8A-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A8A-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDBProperties = interface
    [PreserveSig]
    function GetProperties(cPropertyIDSets: UINT; rgPropertyIDSets: PDBPropIDSetArray;
      var pcPropertySets: UINT; out prgPropertySets: PDBPropSet): HResult;
    [PreserveSig]
    function GetPropertyInfo(cPropertyIDSets: UINT; rgPropertyIDSets: PDBPropIDSetArray;
      var pcPropertyInfoSets: UINT; out prgPropertyInfoSets: PDBPropInfoSet;
      ppDescBuffer: PPOleStr): HResult;
    [PreserveSig]
    function SetProperties(cPropertySets: UINT; rgPropertySets: PDBPropSetArray): HResult;
  end;

// *********************************************************************//
// Interface: IDBInitialize
// GUID:      {0C733A8B-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A8B-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDBInitialize = interface
    [PreserveSig]
    function Initialize: HResult;
    [PreserveSig]
    function Uninitialize: HResult;
  end;

// *********************************************************************//
// Interface: IDBDataSourceAdmin
// GUID:      {0C733A7A-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A7A-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDBDataSourceAdmin = interface
    [PreserveSig]
    function CreateDataSource(cPropertySets: UINT;
                              rgPropertySets: PDBPropSetArray;
                              [In, MarshalAs(UnmanagedType.IUnknown)]
                              const punkOuter: IUnknown;
                              [In, MarshalAs(UnmanagedType.LPStruct)]
                              const riid: TGUID;
                              [Out, MarshalAs(UnmanagedType.IUnknown)]
                              out ppDBSession: IUnknown): HResult;
    [PreserveSig]
    function DestroyDataSource: HResult;
    [PreserveSig]
    function GetCreationProperties(cPropertyIDSets: UINT;
                                   rgPropertyIDSets: PDBPropIDSetArray;
                                   pcPropertyInfoSets: PUINT;
                                   out prgPropertyInfoSets: PDBPropInfoSet;
                                   ppDescBuffer: PPOleStr): HResult;
    [PreserveSig]
    function ModifyDataSource(cPropertySets: UINT;
                              rgPropertySets: PDBPropSetArray): HResult;
  end;

// *********************************************************************//
// Interface: ISessionProperties
// GUID:      {0C733A85-2A1C-11CE-ADE5-00AA0044773d}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A85-2A1C-11CE-ADE5-00AA0044773d'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  ISessionProperties = interface
    [PreserveSig]
    function GetProperties(cPropertyIDSets: UINT; rgPropertyIDSets: PDBPropIDSetArray;
      var pcPropertySets: UINT; out prgPropertySets: PDBPropSet): HResult;
    [PreserveSig]
    function SetProperties(cPropertySets: UINT; rgPropertySets: PDBPropSetArray): HResult;
  end;


// *********************************************************************//
// Interface: ITransactionJoin
// GUID:      {0C733A5E-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A5E-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  ITransactionJoin = interface
    [PreserveSig]
    function GetOptionsObject([MarshalAs(UnmanagedType.Interface)] out ppOptions: ITransactionOptions): HResult;
    [PreserveSig]
    function JoinTransaction([in, MarshalAs(UnmanagedType.IUnknown)] punkTransactionCoord: TObject;
      isoLevel: Integer; isoFlags: UINT;
      [in, MarshalAs(UnmanagedType.Interface)] const pOtherOptions: ITransactionOptions): HResult;
  end;

// *********************************************************************//
// Interface: ITransactionLocal
// GUID:      {0C733A5F-2A1C-11CE-ADE5-00AA0044773D}
// *********************************************************************//
  [ComImport, GuidAttribute('0C733A5F-2A1C-11CE-ADE5-00AA0044773D'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  ITransactionLocal = interface
    // ITransaction
    [PreserveSig]
    function Commit(fRetaining: BOOL; grfTC: UINT; grfRM: UINT): HResult;
    [PreserveSig]
    function Abort(pboidReason: PBOID; fRetaining: BOOL; fAsync: BOOL): HResult;
    [PreserveSig]
    function GetTransactionInfo(out pinfo: XACTTRANSINFO): HResult;

    // ITransactionLocal
    [PreserveSig]
    function GetOptionsObject(out ppOptions: ITransactionOptions): HResult;
    [PreserveSig]
    function StartTransaction(isoLevel: Integer; isoFlags: UINT;
      const pOtherOptions: ITransactionOptions;
      pulTransactionLevel: PUINT): HResult;
  end;

// *********************************************************************//
// Interface: IDBPromptInitialize
// GUID:      {2206CCB0-19C1-11D1-89E0-00C04FD7A829}
// *********************************************************************//
  [ComImport, GuidAttribute('2206CCB0-19C1-11D1-89E0-00C04FD7A829'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDBPromptInitialize = interface
    [PreserveSig]
    function PromptDataSource(
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const pUnkOuter: IUnknown;
      hWndParent: HWND;
      dwPromptOptions: DBPROMPTOPTIONS; cSourceTypeFilter: ULONG;
      rgSourceTypeFilter: PDBSOURCETYPE;
      [Out, MarshalAs(UnmanagedType.LPWStr)]
      pszProviderFilter: OleStr;
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const riid: TIID;
      [MarshalAs(UnmanagedType.IUnknown)]
      var DataSource: IUnknown): HResult;
    [PreserveSig]
    function PromptFileName(hWndParent: HWND; dwPromptOptions: DBPROMPTOPTIONS;
      pwszInitialDirectory, pwszInitialFile: OleStr;
      [MarshalAs(UnmanagedType.LPWStr)]
      var ppwszSelectedFile: OleStr): HResult; 
  end;

// *********************************************************************//
// Interface: IDataInitialize
// GUID:      {2206CCB1-19C1-11D1-89E0-00C04FD7A829}
// *********************************************************************//
  [ComImport, GuidAttribute('2206CCB1-19C1-11D1-89E0-00C04FD7A829'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDataInitialize = interface
    [PreserveSig]
    function GetDataSource(
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const pUnkOuter: IUnknown; 
      dwClsCtx: DWORD;
      [In, MarshalAs(UnmanagedType.LPWStr)]
      const pwszInitializationString: OleStr;
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const riid: TGUID;
      [Out, MarshalAs(UnmanagedType.IUnknown)]
      out DataSource: IUnknown): HResult;
    [PreserveSig]
    function GetInitializationString(
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const DataSource: IUnknown;
      fIncludePassword: Boolean;
      [Out, MarshalAs(UnmanagedType.LPWStr)]
      out pwszInitString: OleStr): HResult;
    function CreateDBInstance(
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const clsidProvider: TGUID;
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const pUnkOuter: IUnknown; 
      dwClsCtx: DWORD;
      [MarshalAs(UnmanagedType.LPWStr)]
      pwszReserved: OleStr;
      riid: TIID;
      [MarshalAs(UnmanagedType.IUnknown)]
      var DataSource: IUnknown): HResult;
    function CreateDBInstanceEx(
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const clsidProvider: TGUID;
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const pUnkOuter: IUnknown; 
      dwClsCtx: DWORD;
      [MarshalAs(UnmanagedType.LPWStr)]
      pwszReserved: OleStr;
      pServerInfo: PCoServerInfo; 
      cmq: ULONG; 
      rgmqResults: PMultiQI): HResult; 
    function LoadStringFromStorage(
      [MarshalAs(UnmanagedType.LPWStr)]
      pwszFileName: OleStr;
      [Out, MarshalAs(UnmanagedType.LPWStr)]
      out pwszInitializationString: OleStr): HResult; 
    function WriteStringToStorage(
      [MarshalAs(UnmanagedType.LPWStr)]
      pwszFileName,
      [MarshalAs(UnmanagedType.LPWStr)]
      pwszInitializationString: OleStr;
      dwCreationDisposition: DWORD): HResult; 
  end;

  [ComImport, GuidAttribute('0c733a7b-2a1c-11ce-ade5-00aa0044773d'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDBSchemaRowset = interface
    [PreserveSig]
    function GetRowset (
      [In, MarshalAs(UnmanagedType.IUnknown)]
      const pUnkOuter: IUnknown;
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const rguidSchema: TGUID;
      cRestrictions: UINT; rgRestrictions: PVariantArray;
      [In, MarshalAs(UnmanagedType.LPStruct)]
      const riid: TGUID;
      cPropertySets: UINT; rgPropertySets: PDBPropSetArray;
      [Out, MarshalAs(UnmanagedType.IUnknown)]
      out ppRowset: IUnknown): HResult;
    [PreserveSig]
    function GetSchemas (out pcSchemas: UINT; out prgSchemas: PGUIDArray;
      prgRestrictionSupport: PUINTArray): HResult;
  end;

  [ComImport,
  GuidAttribute('0C733A69-2A1C-11CE-ADE5-00AA0044773D'),
  InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IOpenRowset = interface // (IUnknown)
    [PreserveSig]
    function OpenRowset([in, MarshalAs(UnmanagedType.IUnknown)] punkOuter: TObject;
      pTableID: PDBID; pIndexID: PDBID;
      [MarshalAs(UnmanagedType.LPStruct)] riid: TGUID; cPropertySets: UINT;
      rgPropertySets: PDBPropSetArray;
      [MarshalAs(UnmanagedType.IUnknown)] var ppRowset): HResult;
  end;

  [ComImport,
  GuidAttribute('5CF4CA13-EF21-11d0-97E7-00C04FC2AD98'),
  InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IRowsetFastLoad = interface // (IUnknown)
    [PreserveSig]
    function InsertRow(HACCESSOR: HACCESSOR; pData: IntPtr): HResult;
    [PreserveSig]
    function Commit(fDone: boolean): HResult;
  end;

  [ComImport, GuidAttribute('0c733a95-2a1c-11ce-ade5-00aa0044773d'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  IDBAsynchStatus = interface
    [PreserveSig]
    function Abort(Chapter: HCHAPTER; Operation: DBASYNCHOP): HRESULT;
    [PreserveSig]
    function GetStatus(
      Chapter: HCHAPTER; // UINT
      Operation: DBASYNCHOP; // UINT
      var Progress: UINT;
      var ProgressMax: UINT; var AsynchPhase: DWORD;
      var pStatusText: IntPtr): HRESULT;
  end;

  [ComImport, GuidAttribute('1FF1F743-8BB0-4c00-ACC4-C10E43B08FC1'), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
  ISSAsynchStatus = interface // (IDBAsynchStatus)
    [PreserveSig]
    function Abort(Chapter: HCHAPTER; Operation: DBASYNCHOP): HRESULT;
    [PreserveSig]
    function GetStatus(
      Chapter: HCHAPTER; // UINT
      Operation: DBASYNCHOP; // UINT
      var Progress: UINT;
      var ProgressMax: UINT; var AsynchPhase: DWORD;
      var pStatusText: IntPtr): HRESULT;

    [PreserveSig]
    function WaitForAsynchCompletion(MillisecTimeOut: DWORD): HRESULT;
  end;
1234

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -