vcdzl.dpr

来自「图书影碟租赁管理系统」· DPR 代码 · 共 38 行

program vcdzl;

uses
  Forms,
  login in 'login.pas' {F_login},
  passedit in 'passedit.pas' {F_passedit},
  lb in 'lb.pas' {F_lb},
  datam in 'datam.pas' {dm: TDataModule},
  vcdgl in 'vcdgl.pas' {F_vcdgl},
  vcdedit in 'vcdedit.pas' {F_vcdedit},
  main in 'main.pas' {F_main},
  vcdcz in 'vcdcz.pas' {F_rent},
  czy in 'czy.pas' {F_czy},
  vcdcx in 'vcdcx.pas' {F_vcdcx},
  hygl in 'hygl.pas' {F_hygl},
  vipedit in 'vipedit.pas' {F_vipedit},
  vipcx in 'vipcx.pas' {F_vipcx},
  viptz in 'viptz.pas' {F_viptz},
  about in 'about.pas' {F_about},
  vcdlocate in 'vcdlocate.pas' {F_locate},
  cash in 'cash.pas' {F_cash},
  vcdprt in 'vcdprt.pas' {F_vcdprt},
  qrcash in 'qrcash.pas' {qr_cash: TQuickRep},
  vcdhz in 'vcdhz.pas' {F_vcdhz};

{$R *.res}

begin
  Application.Initialize;
  Application.HelpFile := '.\help\HelpFile.HLP';
  Application.CreateForm(TF_login, F_login);
  Application.CreateForm(Tdm, dm);
  Application.CreateForm(TF_login, F_login);
  Application.CreateForm(Tqr_cash, qr_cash);
  Application.CreateForm(TF_vcdhz, F_vcdhz);
  Application.Run;
end.