n_sbdj.dpr

设备巡检操作系统 本程序是专门为某电厂开发的设备巡检系统

program N_SBDJ;

uses
  Forms,
  UnMain in 'UnMain.pas' {Main_Frm},
  UnEmployee in 'UnEmployee.pas' {Employee_Frm},
  Undm in 'Undm.pas' {DM: TDataModule},
  UnFuntion in 'UnFuntion.pas',
  UnLogin in 'UnLogin.pas' {Login_Frm},
  UnEumt in 'UnEumt.pas' {Eumt_Frm},
  UnPlan in 'UnPlan.pas' {Plan_frm},
  UnPerPlan in 'UnPerPlan.pas' {PerPlan_frm},
  UnEmployeeFind in 'UnEmployeeFind.pas' {EmployeeFind_frm},
  UnDept in 'UnDept.pas' {Dept_frm},
  UnOracleSetup in 'UnOracleSetup.pas' {Oracle_frm},
  UnRePassWord in 'UnRePassWord.pas' {Repass_frm},
  xyCom in 'xyCom.pas' {DjCom},
  Global in 'Global.pas',
  Setup in 'Setup.pas' {frmSetup},
  UnXfind in 'UnXfind.pas' {Xfind_frm},
  UnFindoutPt in 'UnFindoutPt.pas' {findout_frm},
  UnFindPerPlan in 'UnFindPerPlan.pas' {FindoutPerPlan_frm},
  UnUpDataModi in 'UnUpDataModi.pas' {UpDataModi_frm},
  UnPerUpdatafind in 'UnPerUpdatafind.pas' {PerUpdatafind_frm},
  UnAbout in 'UnAbout.pas' {About_Frm},
  UnPrtMsrVal in 'UnPrtMsrVal.pas' {Prt_MsrVal_Frm},
  Undate in 'Undate.pas' {date_frm},
  U_SaveOrRestore in 'U_SaveOrRestore.pas' {Frm_SaveOrRestore},
  USelMsr in 'USelMsr.pas' {Frm_SelMsr},
  UnFindNcpt in 'UnFindNcpt.pas' {Frm_FindNCPT},
  UnViewNcpt in 'UnViewNcpt.pas' {frm_ViewNcpt},
  SCFormPreview in 'SCFormPreview.pas' {SCRavePreviewForm},
  UnPerSelPlan in 'UnPerSelPlan.pas' {Frm_PerSelPlan};

{$R *.res}

begin
  Application.Initialize;

  Application.Title := '邢台电厂点检管理系统';
  About_Frm:=TAbout_frm.Create(Application);
  About_Frm.Show;
  About_Frm.Update;
  Application.CreateForm(TMain_Frm, Main_Frm);
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TLogin_Frm, Login_Frm);
  Application.CreateForm(TDjCom, DjCom);
  Login_Frm.ShowModal;
  Application.Run;
end.