hy.dpr

货物配送管理系统对配送服务

program HY;

uses
  Forms,
  Windows,
  main in 'main.pas' {MainForm},
  DMUnit in 'DMUnit.pas' {DM: TDataModule},
  PublicUnit in 'PublicUnit.pas' {PublicUnit},
  WH110Unit in 'WH110Unit.pas' {WH110Form},
  WH120Unit in 'WH120Unit.pas' {WH120Form},
  WH210Unit in 'WH210Unit.pas' {WH210Form},
  LogonUnit in 'LogonUnit.pas' {Logon},
  WH310Unit in 'WH310Unit.pas' {WH310Form},
  PubRptUnit in 'PubRptUnit.pas' {PubRptForm: TQuickRep},
  WH310rpt in 'WH310rpt.pas' {WH310rptForm: TQuickRep},
  WH320Unit in 'WH320Unit.pas' {WH320Form},
  WH330Unit in 'WH330Unit.pas' {WH330Form},
  WH340Unit in 'WH340Unit.pas' {WH340Form},
  WH350Unit in 'WH350Unit.pas' {WH350Form},
  WH360Unit in 'WH360Unit.pas' {WH360Form},
  WH410Unit in 'WH410Unit.pas' {WH410Form},
  WH420Unit in 'WH420Unit.pas' {WH420Form},
  ZY110Unit in 'ZY110Unit.pas' {ZY110Form},
  JS510Unit in 'JS510Unit.pas' {JS510Form},
  DateUnit in 'DateUnit.pas' {DateForm},
  ZY130Unit in 'ZY130Unit.pas' {ZY130Form},
  ZY210Unit in 'ZY210Unit.pas' {ZY210Form},
  ZY220Unit in 'ZY220Unit.pas' {ZY220Form},
  ZY310Unit in 'ZY310Unit.pas' {ZY310Form},
  CX110Unit in 'CX110Unit.pas' {CX110Form},
  FW210Unit in 'FW210Unit.pas' {FW210Form},
  FW110Unit in 'FW110Unit.pas' {FW110Form},
  CX120Unit in 'CX120Unit.pas' {CX120Form},
  CX210Unit in 'CX210Unit.pas' {CX210Form},
  CX220Unit in 'CX220Unit.pas' {CX220Form},
  CX310Unit in 'CX310Unit.pas' {CX310Form},
  CX320Unit in 'CX320Unit.pas' {CX320Form},
  JS420Unit in 'JS420Unit.pas' {JS420Form},
  JS210Unit in 'JS210Unit.pas' {JS210Form},
  JS220Unit in 'JS220Unit.pas' {JS220Form},
  JS230Unit in 'JS230Unit.pas' {JS230Form},
  JS240Unit in 'JS240Unit.pas' {JS240Form},
  JS310Unit in 'JS310Unit.pas' {JS310Form},
  JS320Unit in 'JS320Unit.pas' {JS320Form},
  JS110Unit in 'JS110Unit.pas' {JS110Form};

{$R *.res}

begin
  Application.Initialize;

  Application.CreateForm(TDM, DM);
  Application.CreateForm(TMainForm, MainForm);
  try //当窗体绘制的时候，弹出登陆对话框
    Application.CreateForm(TLogon, Logon);
    Logon.ShowModal;
    Logon.Free;
  except
    MessageBox(0, '登陆窗体创建错误', '', MB_OK + MB_ICONSTOP);
  end;
  Application.Run;
end.