server.dpr

来自「c/s系统。 delphi 6+access 运行前先配置数据环境：把db文件夹」· DPR 代码 · 共 48 行

program server;

uses
  Forms,
  pass in 'pass.pas' {fpass},
  bx in 'bx.pas' {bxb},
  cx in 'cx.pas' {fchaxun},
  deleteuser in 'deleteuser.pas' {scyh},
  dy in 'dy.pas' {daybd},
  gy in 'gy.pas' {guanyu},
  qxfp in 'qxfp.pas' {fqxfp},
  adduser in 'adduser.pas' {zjxyh},
  u_tj in 'u_tj.pas' {tj},
  u_wxyprint in 'u_wxyprint.pas' {wxyprint},
  zjm in 'zjm.pas' {fzjm},
  xiugaimm in 'xiugaimm.pas' {xgmm},
  xiugaiyhm in 'xiugaiyhm.pas' {xgyhm},
  sjkwh in 'sjkwh.pas' {whsjb},
  u_ren in 'u_ren.pas' {ren},
  u_del in 'u_del.pas' {del},
  u_add in 'u_add.pas' {add},
  hz in 'hz.pas' {hz_f};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(Tfpass, fpass);
  Application.CreateForm(Tbxb, bxb);
  Application.CreateForm(Tfchaxun, fchaxun);
  Application.CreateForm(Tscyh, scyh);
  Application.CreateForm(Tdaybd, daybd);
  Application.CreateForm(Tguanyu, guanyu);
  Application.CreateForm(Tfqxfp, fqxfp);
  Application.CreateForm(Tzjxyh, zjxyh);
  Application.CreateForm(Ttj, tj);
  Application.CreateForm(Twxyprint, wxyprint);
  Application.CreateForm(Tfzjm, fzjm);
  Application.CreateForm(Txgmm, xgmm);
  Application.CreateForm(Txgyhm, xgyhm);
  Application.CreateForm(Twhsjb, whsjb);
  Application.CreateForm(Tren, ren);
  Application.CreateForm(Tdel, del);
  Application.CreateForm(Tadd, add);
  Application.CreateForm(Thz_f, hz_f);
  Application.Run;
end.