dmconn.pas

来自「fastreport演示程序。fastreport是vcl库的下的一个报表三方控」· PAS 代码 · 共 32 行

unit dmConn;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  TdmFRDemo = class(TDataModule)
    conAccess: TADOConnection;
    qryAccess: TADOQuery;
    qryAccessfMenuID: TAutoIncField;
    qryAccessfMenuName: TWideStringField;
    qryAccessfMenuUnit: TWideStringField;
    qryAccessfMenuPrice: TIntegerField;
    qryAccessfMenuType: TWideStringField;
    qryAccessfMenuMemo: TWideStringField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dmFRDemo: TdmFRDemo;

implementation

{$R *.dfm}

end.