project1.dpr

来自「该系统是学生人事管理系统」· DPR 代码 · 共 40 行

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2},
  Unit3 in 'Unit3.pas' {DataModule3: TDataModule},
  Unit4 in 'Unit4.pas' {Form4},
  Unit5 in 'Unit5.pas' {Form5},
  report in 'report.pas' {Form6},
  find in 'find.pas' {Form7},
  SQL in 'SQL.pas' {Form8},
  qidong in 'qidong.pas' {Form9},
  donglu in 'donglu.pas' {Form10},
  Unit11 in 'Unit11.pas' {Form11},
  guanyu in 'guanyu.pas' {Form12},
  Unit13 in 'Unit13.pas' {Form13},
  Unit14 in 'Unit14.pas' {Form14},
  Unit15 in 'Unit15.pas' {Form15},
  Unit16 in 'Unit16.pas' {Form16};

{$R *.res}

begin
  Application.Initialize;
  form9:=tform9.Create(application);
  form9.Show;
  form9.Update;
    while form9.Timer1.Enabled do
  Application.ProcessMessages;
  Application.Title := '学生人事管理系统';
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TDataModule3, DataModule3);
  //Application.CreateForm(TForm6, Form6);
  //Application.CreateForm(TForm11, Form11);
  form9.Hide;
  form9.Free;
  Application.Run;
end.