plmsdm.~pas

来自「停车场收费系统停车场收费系统停车场收费系统停车场收费系统」· ~PAS 代码 · 共 37 行

unit PlmsDM;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, ADODB;

type
  TDM = class(TDataModule)
    cnnRemote: TADOConnection;
    cnnLocal: TADOConnection;
    tblGetFee: TADOTable;
    tblFixCardUse: TADOTable;
    tblTempCardUse: TADOTable;
    tblFeeStation: TADOTable;
    ADOQuery1: TADOQuery;
    tblCard: TADOTable;
    dsCardUse: TDataSource;
    tblShiftRecord: TADOTable;
    tblFeeMaintain: TADOTable;
    tblFeeStationDisplay: TADOTable;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DM: TDM;

implementation

{$R *.DFM}

end.