p_jfos.dpr

来自「机房管理系统delphi源代码」· DPR 代码 · 共 40 行

program p_Jfos;

uses
  Forms,
  jfos in 'jfos.pas' {f_jfos},
  help_about in 'help_about.pas' {f_help_about},
  yhgl in 'yhgl.pas' {f_yhgl},
  data in 'data.pas' {ds_data: TDataModule},
  yhgl_ref in 'yhgl_ref.pas' {f_yhgl_ref},
  sbgl in 'sbgl.pas' {f_sbgl},
  sbgl_ref in 'sbgl_ref.pas' {f_sbgl_ref},
  gbv in 'gbv.pas' {f_gbv},
  mmxn in 'mmxn.pas' {f_mmxn},
  yhsj in 'yhsj.pas' {f_yhsj},
  yysb in 'yysb.pas' {f_yysb},
  szkl in 'szkl.pas' {f_szkl},
  qxhelp in 'qxhelp.pas' {f_qxhelp},
  cover in 'cover.pas' {f_cover};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(Tf_jfos, f_jfos);
  Application.CreateForm(Tf_cover, f_cover);
  Application.CreateForm(Tf_mmxn, f_mmxn);
  Application.CreateForm(Tf_help_about, f_help_about);
  Application.CreateForm(Tf_yhgl, f_yhgl);
  Application.CreateForm(Tds_data, ds_data);
  Application.CreateForm(Tf_yhgl_ref, f_yhgl_ref);
  Application.CreateForm(Tf_sbgl, f_sbgl);
  Application.CreateForm(Tf_sbgl_ref, f_sbgl_ref);
  Application.CreateForm(Tf_gbv, f_gbv);
  Application.CreateForm(Tf_yhsj, f_yhsj);
  Application.CreateForm(Tf_yysb, f_yysb);
  Application.CreateForm(Tf_szkl, f_szkl);
  Application.CreateForm(Tf_qxhelp, f_qxhelp);
  Application.Run;
end.