p_dm.pas

超市系统超市系统超市系统超市系统超市系统超市系统超市系统超市系统超市系统超市系统超市系统超市系统超市系统超市系统

unit p_dm;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  Tdm = class(TDataModule)
    DS_USER: TDataSource;
    ADO: TADOConnection;
    T_USER: TADODataSet;
    DS_MENU: TDataSource;
    DS_QX: TDataSource;
    T_MENU: TADODataSet;
    T_QX: TADODataSet;
    T_DL: TADODataSet;
    T_JRRZ: TADODataSet;
    DS_JRRZ: TDataSource;
    Query: TADOQuery;
    CCJRRZ: TADOStoredProc;
    CCTCRZ: TADOStoredProc;
    T_ffry: TADODataSet;
    DS_FFRY: TDataSource;
    DS_BM: TDataSource;
    T_BM: TADODataSet;
    DS_zw: TDataSource;
    t_zw: TADODataSet;
    DS_QUERY: TDataSource;
    DS_SP: TDataSource;
    t_sp: TADODataSet;
    DS_SPFL: TDataSource;
    T_SPFL: TADODataSet;
    DS_SPXH: TDataSource;
    T_SPXH: TADODataSet;
    DS_RK: TDataSource;
    T_RK: TADODataSet;
    DS_KC: TDataSource;
    T_KC: TADODataSet;
    DS_YH: TDataSource;
    T_YH: TADODataSet;
    DS_KH: TDataSource;
    T_KH: TADODataSet;
    DS_TEMPRK: TDataSource;
    T_TEMPRK: TADODataSet;
    DS_CRKD: TDataSource;
    T_CRKD: TADODataSet;
    T_TEMPCK: TADODataSet;
    DS_TEMPCK: TDataSource;
    T_CK: TADODataSet;
    DS_CK: TDataSource;
    QUERY1: TADOQuery;
    DS_QUERY1: TDataSource;
    Query2: TADOQuery;
    DS_QUERY2: TDataSource;
    t_reg: TADODataSet;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dm: Tdm;

implementation

{$R *.dfm}

end.