hwgl.dpr

单机进销存管理程序 Delphi+Acce

program hwgl;

uses
  Forms,
  mainform in 'mainform.pas' {main_Form},
  czdhform in 'czdhform.pas' {czdh_form},
  jhform in 'jhform.pas' {jh_form},
  jhghsfindform in 'jhghsfindform.pas' {jh_ghs_find_form},
  cszlform in 'cszlform.pas' {cszl_form},
  jhjsrfindform in 'jhjsrfindform.pas' {jh_jsr_find_form},
  ygzlform in 'ygzlform.pas' {ygzl_form},
  jhspfindform in 'jhspfindform.pas' {jh_sp_find_form},
  spzlform in 'spzlform.pas' {spzl_form},
  spzlfindform in 'spzlfindform.pas' {spzl_find_form},
  spflform in 'spflform.pas' {spfl_form},
  spzldwform in 'spzldwform.pas' {spzl_dw_form},
  jldwform in 'jldwform.pas' {jldw_form},
  data in 'data.pas' {Database: TDataModule},
  jhdfindform in 'jhdfindform.pas' {jhd_find_form},
  jhfkfindform in 'jhfkfindform.pas' {jhfk_find_form},
  ghsfindform in 'ghsfindform.pas' {ghs_find_form},
  ygzlfindform in 'ygzlfindform.pas' {ygzl_find_form},
  spzl2findform in 'spzl2findform.pas' {spzl2_find_form},
  spflfindform in 'spflfindform.pas' {spfl_find_form},
  jldwfindform in 'jldwfindform.pas' {jldw_find_form},
  sfkfsform in 'sfkfsform.pas' {sfkfs_form},
  sfkfsfindform in 'sfkfsfindform.pas' {sfkfs_find_form},
  jhdhfindform in 'jhdhfindform.pas' {jhdh_find_form},
  jh_th_unit in 'jh_th_unit.pas' {jh_th_form},
  jh_th_find_unit in 'jh_th_find_unit.pas' {jh_th_find_form},
  xs_unit in 'xs_unit.pas' {xs_form},
  xs_find_unit in 'xs_find_unit.pas' {xs_find_form},
  xsfk_find_unit in 'xsfk_find_unit.pas' {xsfk_find_form},
  xsdh_find_unit in 'xsdh_find_unit.pas' {xsdh_find_form},
  khth_unit in 'khth_unit.pas' {khth_form},
  fx_unit in 'fx_unit.pas' {fx_form},
  cbhs_unit in 'cbhs_unit.pas' {cbhs_form},
  csh_unit in 'csh_unit.pas' {csh_form},
  khzl_unit in 'khzl_unit.pas' {khzl_form},
  khzl_find_unit in 'khzl_find_unit.pas' {khzl_find_form},
  fen_unit in 'fen_unit.pas' {fen_form},
  gy_unit in 'gy_unit.pas' {gy_form},
  login_unit in 'login_unit.pas' {login_form},
  modi_unit in 'modi_unit.pas' {modi_Form};

{$R *.res}

begin
  Application.Initialize;
  fen_form:=tfen_form.Create(application);
  fen_form.ShowModal;
  Application.CreateForm(Tmain_Form, main_Form);
  main_form.Show;
  application.CreateForm(Tdatabase,database);
  login_form:=tlogin_form.create(application);
  login_form.showmodal;
  //Application.CreateForm(Tlogin_form, login_form);

  application.CreateForm(Tczdh_form,czdh_form);

  Application.Run;
end.