gzgl.dpr

工资管理系统+论文.DOC

program gzgl;

uses
  Forms,
  main in 'gzgl\main.pas' {MainForm},
  spash in 'gzgl\spash.pas' {SplashForm},
  yggzjgtz in 'byxj\yggzjgtz.pas' {frm_yggzjgtz},
  dm in 'byxj\dm.pas' {dmain: TDataModule},
  about in 'gzgl\about.pas' {frm_about},
  dl in 'gzgl\dl.pas' {Frm_dl},
  yhgl in 'byxj\yhgl.pas' {frm_yhgl},
  zcxg in 'byxj\zcxg.pas' {Frm_zcxg},
  ygzbxxxr in 'byxj\ygzbxxxr.pas' {frm_ygzbxxsr},
  gzzmxg in 'byxj\gzzmxg.pas' {Frm_gzzmwh},
  zwxg in 'byxj\zwxg.pas' {Frm_zwxg},
  bmxg in 'byxj\bmxg.pas' {Frm_bmxg},
  adduser in 'byxj\adduser.pas' {Frm_adduser},
  changepawd in 'byxj\changepawd.pas' {Frm_changepawd},
  cp in 'byxj\cp.pas' {frm_cp},
  pub in 'byxj\pub.pas',
  wait_cx in 'byxj\wait_cx.pas' {wiat_tsForm},
  llygzzxx in 'byxj\llygzzxx.pas' {Frm_llygzbxx},
  ygzbxxwh in 'byxj\ygzbxxwh.pas' {frm_ygzbxxwh},
  ygzlcx in 'byxj\ygzlcx.pas' {frm_ygzlcx};

{$R *.res}

begin
  Application.Initialize;
  SplashForm:=Tsplashform.Create(application);
  splashform.Show;
  splashform.Update;

  while splashform.SplashTimer.Enabled do
  application.ProcessMessages;
  Application.Title:='企业工资管理系统';

  Application.CreateForm(Tdmain, dmain);
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TFrm_dl, Frm_dl);
  SplashForm.Hide;
  Frm_dl.ShowModal;
  SplashForm.Free;
  Application.Run;
end.