project1.dpr

来自「简单的人事工资管理系统.... 我是想下载源码菜拿来换的...呵呵~~ 」· DPR 代码 · 共 58 行

program Project1;

uses
  ExceptionLog,
  Forms,
  Unit1 in 'Unit1.pas' {MainForm},
  About_frm in 'About_frm.pas' {About},
  frm_klxg in 'frm_klxg.pas' {klxiugai},
  U_xgkl in 'U_xgkl.pas' {qxfrm},
  DataModule in 'DataModule.pas' {DM: TDataModule},
  U_Common in 'U_Common.pas',
  u_Logon in 'u_Logon.pas' {frmLogon},
  Findfrm in 'Findfrm.pas' {Find},
  uQuanXian in 'uQuanXian.pas' {frmQuanXian},
  u_LuRu in 'u_LuRu.pas' {frmLuRu},
  U_JBxxDelete in 'U_JBxxDelete.pas' {JiBenXinXi},
  U_WeiHu in 'U_WeiHu.pas' {WeiHu},
  U_XXxiugai in 'U_XXxiugai.pas' {Form2},
  Windows,
  DateUtils;




{$R *.res}

begin
  Application.Initialize;
  Application.Title := '人事工资管理信息系统';
  Application.CreateForm(TMainForm, MainForm);
 // Application.CreateForm(TForm2, Form2);

  MainForm.E123456;

  Application.ShowMainForm:=False;          //
  Application.CreateForm(TDM, DM);          //

  Application.CreateForm(TFind, Find);

  frmLogon:=TfrmLogon.Create(Application);  //
  frmLogon.ShowModal;                       //

  MainForm.ShowMainFromAll;
  Application.CreateForm(TfrmQuanXian, frmQuanXian);
  Application.CreateForm(TfrmLuRu, frmLuRu);
  Application.CreateForm(TJiBenXinXi, JiBenXinXi);
  Application.CreateForm(TWeiHu, WeiHu);
  Application.ShowMainForm:=True;


  //Application.CreateForm(TAbout, About);
  //Application.CreateForm(Tklxiugai, klxiugai);
 // Application.CreateForm(Tqxfrm, qxfrm);


  Application.Run;
end.