project1.dpr

来自「使用DELPHI6.0开发的停车场管理信息系统 使用ADO和BDE技术连接SQL」· DPR 代码 · 共 46 行

DPR
46
字号
program Project1;

uses
  Forms,
  index2 in 'index2.pas' {Form1},
  index1 in 'index1.pas' {splash},
  dengji in 'dengji.pas' {dengjitab1},
  Unit3 in 'Unit3.pas' {tishi1},
  data in 'data.pas' {data1},
  Unit4 in 'Unit4.pas' {tishi2},
  ckdengji in 'ckdengji.pas' {chukou},
  history in 'history.pas' {PagesDlg},
  dlk in 'dlk.pas' {denglu},
  new_cheku in 'new_cheku.pas' {chewei},
  mima in 'mima.pas' {woker_info},
  Unit2 in 'Unit2.pas' {admin_proc},
  Unit5 in 'Unit5.pas' {about},
  super_admin in 'super_admin.pas' {Form6};

{$R *.res}

begin
  Application.Initialize;
  splash:=Tsplash.Create(Application);
  splash.Timer1.Enabled := True;
  splash.Show;
  while splash.Login_Off = False do
        Application.ProcessMessages;
        splash.Hide;
        splash.Free;  
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(Tdengjitab1, dengjitab1);
  Application.CreateForm(Ttishi1, tishi1);
  Application.CreateForm(Tdata1, data1);
  Application.CreateForm(Ttishi2, tishi2);
  Application.CreateForm(Tchukou, chukou);
  Application.CreateForm(Tdenglu, denglu);
  Application.CreateForm(Tchewei, chewei);
  Application.CreateForm(Twoker_info, woker_info);
  Application.CreateForm(TPagesDlg, PagesDlg);
  Application.CreateForm(Tadmin_proc, admin_proc);
  Application.CreateForm(Tabout, about);
  Application.CreateForm(TForm6, Form6);
  Application.Run;
end.

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?