pxfh.~dpr

青年文明号管理系统

program Pxfh;

uses
  Forms,
  Umain in 'Umain.pas' {main},
  Uword in 'Uword.pas' {Word},
  Udm in 'Udm.pas' {DM: TDataModule},
  u_vardef in 'u_vardef.pas',
  Usbb in 'Usbb.pas' {sbb},
  Uvsbb in 'Uvsbb.pas' {vsbb},
  u_splash in 'u_splash.pas' {Splash},
  Ujtqk in 'Ujtqk.pas' {jtqk},
  U_jobProcessJM in 'U_jobProcessJM.pas' {JobProcessJm},
  Ujtqk_input in 'Ujtqk_input.pas' {jtqk_input},
  Uxzqh in 'Uxzqh.pas' {xzqh},
  Uexp in 'Uexp.pas' {exp1},
  Uimp in 'Uimp.pas' {imp},
  Uabout in 'Uabout.pas' {about};

{$R *.res}

begin
  Application.Initialize;

  Splash:=TSplash.Create(Application);
  Splash.Show;
  Splash.Update;

  while Splash.tm.Enabled do
  Application.ProcessMessages;
  Application.CreateForm(TDM, DM);
  Application.CreateForm(Tmain, main);
  Splash.hide;
  Splash.free;

  Application.Run;
end.