carpro.~dpr

来自「超级简单的管理系统」· ~DPR 代码 · 共 31 行

program CarPro;

uses
  Forms,
  SysUtils,
  CarUn in 'CarUn.pas' {Loginfrm},
  Unit1 in 'Unit1.pas' {frmServer},
  Unit2select in 'Unit2select.pas' {frmInfoSearch},
  UnitHy in 'UnitHy.pas' {frmHuiYuan},
  UnitHeJi in 'UnitHeJi.pas' {frmDataSum},
  splashWindows in 'splashWindows.pas' {Form2};

{$R *.res}

begin
  Form2:=TForm2.Create(Application);
  Form2.Show;
  Form2.Update;
  Sleep(1000);
  Form2.Hide;
  Form2.Free;
  Application.Initialize;
  Application.CreateForm(TLoginfrm, Loginfrm);
  Application.CreateForm(TfrmServer, frmServer);
  Application.CreateForm(TfrmInfoSearch, frmInfoSearch);
  Application.CreateForm(TfrmHuiYuan, frmHuiYuan);
  Application.CreateForm(TfrmDataSum, frmDataSum);
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.