datam.pas

来自「本程序是一个餐饮业的管理软件」· PAS 代码 · 共 49 行

unit DataM;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  TData = class(TDataModule)
    ADOConnectMeal: TADOConnection;
    ADOQLogin: TADOQuery;
    ADOQStream: TADOQuery;
    ADOQTBegin: TADOQuery;
    ADOQTEnd: TADOQuery;
    ADOQOrder: TADOQuery;
    DataSOrder: TDataSource;
    ADOQEmployee: TADOQuery;
    DataSEnd: TDataSource;
    DataSBegin: TDataSource;
    ADOQObject: TADOQuery;
    DataSObject: TDataSource;
    ADOQMenu: TADOQuery;
    DataSMenu: TDataSource;
    ADOQStaple: TADOQuery;
    DataSStaple: TDataSource;
    ADOQProvider: TADOQuery;
    DataSProvider: TDataSource;
    ADOQBuyEvent: TADOQuery;
    ADOQDepleteEvent: TADOQuery;
    DataSEmployee: TDataSource;
    ADOQAttendence: TADOQuery;
    DataSAttendence: TDataSource;
    DataSLogin: TDataSource;
    DataSStream: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Data: TData;

implementation

{$R *.dfm}

end.