datasetquery.pas

来自「delphi通过OCI访问ORACLE」· PAS 代码 · 共 26 行

unit DataSetQuery;

{$INCLUDE dOCI.inc}

{$define myora}
{$define mymem}

{
 Descendant of  TVirtualDataSet

  Wrapper for all tables based on TADataSet.
  allows to use them as TDataSet, i.e. in Delphi controls
}

interface

uses
  VirtualDataSet, DynamicArrays, Db, Classes,
  DBConsts, ADataSet, dOCIMEssages
  {$IFDEF D7} ,Variants {$ENDIF}
  {$ifdef myora},OraDB,AOraSQL{$endif}
  {$ifdef mymem},AMemoryDataSet{$endif}
  ;

{