project1.dpr

来自「本系统用于大学学生宿舍管理」· DPR 代码 · 共 39 行

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {f_login},
  Unit2 in 'Unit2.pas' {f_show},
  f_main in 'f_main.pas' {Form3},
  ado_query in 'ado_query.pas' {data_1: TDataModule},
  f_xgmm in 'f_xgmm.pas' {f_xgmima},
  f_yhgl in 'f_yhgl.pas' {Form4},
  data_2 in 'data_2.pas' {Data4: TDataModule},
  Unit6 in 'Unit6.pas' {f_wsqk},
  Unit7 in 'Unit7.pas' {f_cxqs},
  Unit8 in 'Unit8.pas' {f_cxws},
  Unit9 in 'Unit9.pas' {f_bz},
  Unit10 in 'Unit10.pas' {Form10};

{$R *.res}

begin
  Application.Initialize;
   f_show:=tf_show.create(application);
   f_show.Show;
   f_show.Update;
  Application.CreateForm(Tf_login, f_login);
  Application.CreateForm(Tf_wsqk, f_wsqk);
  Application.CreateForm(Tf_bz, f_bz);
  Application.CreateForm(Tf_cxws, f_cxws);
  Application.CreateForm(TForm4, Form4);
  Application.CreateForm(Tf_xgmima, f_xgmima);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(Tdata_1, data_1);
  Application.CreateForm(TData4, Data4);
  Application.CreateForm(TForm10, Form10);
  f_show.Hide;
  f_show.Free;
  Application.Run;
end.