vcdrentpro.dpr

来自「《delphi数据库设计与实例开发》随书光盘」· DPR 代码 · 共 40 行

program VCDRentPro;

uses
  Forms,
  c_changepass in 'c_changepass.pas' {cfrm_changepass},
  c_about in 'c_about.pas' {cfrm_about},
  c_cash in 'c_cash.pas' {cfrm_cash},
  c_vcdbrowse in 'c_vcdbrowse.pas' {cfrm_vcdbrowse},
  c_vcdback in 'c_vcdback.pas' {cfrm_vcdback},
  c_vcdrent in 'c_vcdrent.pas' {cfrm_vcdrent},
  c_vcdsearch in 'c_vcdsearch.pas' {cfrm_vcdsearch},
  c_vcdedit in 'c_vcdedit.pas' {cfrm_vcdedit},
  c_vcdmgn in 'c_vcdmgn.pas' {cfrm_vcdmge},
  c_editpass in 'c_editpass.pas' {cfrm_editpass},
  c_pass in 'c_pass.pas' {cfrm_pass},
  c_exitclub in 'c_exitclub.pas' {cfrm_exitclub},
  c_clientsearch in 'c_clientsearch.pas' {cfrm_ClientSearch},
  c_clientedit in 'c_clientedit.pas' {cfrm_clientedit},
  c_client in 'c_client.pas' {cfrm_client},
  c_lb in 'c_lb.pas' {cfrm_lb},
  c_czy in 'c_czy.pas' {cfrm_czy},
  c_dw in 'c_dw.pas' {cfrm_dw},
  c_mainform in 'c_mainform.pas' {cfrm_mainform},
  c_login in 'c_login.pas' {cfrm_login},
  datam in 'datam.pas' {dm: TDataModule},
  publicvar in 'publicvar.pas',
  c_vcdlocate in 'c_vcdlocate.pas' {cfrm_vcdlocate},
  CommonRoutines in 'commonRoutines.pas',
  c_qk in 'c_qk.pas' {cfrm_qk};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '影碟租赁管理';
  Application.CreateForm(Tdm, dm);
  Application.CreateForm(Tcfrm_login, cfrm_login);
  Application.Run;
end.