personmis.dpr

来自「此为一个用delphi语言编写的人事管理系统」· DPR 代码 · 共 31 行

program PersonMIS;

uses
  Forms,
  Sysutils,
  Main in 'MAIN.PAS' {MainForm},
  uLogin in 'uLogin.pas' {frmLogin},
  uPublic in 'uPublic.pas',
  uRightsSetting in 'uRightsSetting.pas' {frmRightSetting},
  uStainfo in 'uStainfo.pas' {frmStainfo},
  uglobal in 'uglobal.pas',
  uData in 'uData.pas' {dmPer: TDataModule},
  uDep in 'uDep.pas' {frmDep},
  uDBadmin in 'uDBadmin.pas' {frmDBadmin},
  uChange in 'uChange.pas' {frmChange},
  ufind in 'uFind.pas' {frmfind};

{$R *.RES}

begin
  Application.Initialize;
  //dmPer模块先于主窗体之前创立，是因为登陆模块中使用了其数据库连接对象
  Application.CreateForm(TdmPer, dmPer);
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TfrmDep, frmDep);
  Application.CreateForm(TfrmDBadmin, frmDBadmin);
  Application.CreateForm(TfrmChange, frmChange);
  Application.CreateForm(Tfrmfind, frmfind);
  Application.Run;
end.