cec_mis.dpr

档案资料管理系统

program CEC_MIS;

uses
  Forms,
  FM_Face in 'FM_Face.pas' {FM_FACE1},
  FM_Login in 'FM_Login.pas' {FM_Login1},
  FM_Main in 'FM_Main.pas' {FM_MAIN1},
  FM_NewProject in 'FM_NewProject.pas' {FM_NewProject1},
  FM_NewEngineering in 'FM_NewEngineering.pas' {FM_NewEngineering1},
  FM_OpenProject in 'FM_OpenProject.pas' {FM_OpenProject1},
  FM_NewEngineerSelect in 'FM_NewEngineerSelect.pas' {FM_NewEngineerSelect1},
  FM_About in 'FM_About.pas' {FM_About1},
  FM_NewFile in 'FM_NewFile.pas' {FM_NewFile1},
  FM_People in 'FM_People.pas' {FM_People1},
  FM_OpenEngineer in 'FM_OpenEngineer.pas' {FM_OpenEngineer1},
  FM_OpenFile in 'FM_OpenFile.pas' {FM_OpenFile1},
  FM_LeadView in 'FM_LeadView.pas' {FM_LeadView1},
  FM_ViewInfo in 'FM_ViewInfo.pas' {FM_ViewInfo1},
  FM_DeleteProject in 'FM_DeleteProject.pas' {FM_DeleteProject1},
  FM_DeleteEnginnering in 'FM_DeleteEnginnering.pas' {FM_DeleteEnginnering1},
  FM_DeleteOther in 'FM_DeleteOther.pas' {FM_DeleteOther1},
  FM_DateBackUp in 'FM_DateBackUp.pas' {FM_DateBackUp1};

{$R *.res}

begin
  FM_Face1:=TFM_Face1.Create(nil);
  FM_Face1.ShowModal;
  Application.Initialize;
  Application.Title := '中国电子第二分公司档案资料管理系统';
  Application.CreateForm(TFM_MAIN1, FM_MAIN1);
  Application.CreateForm(TFM_DateBackUp1, FM_DateBackUp1);
  Application.Run;
end.