pmis.dpr

来自「用delphi+access给单位做的实用,简单的.」· DPR 代码 · 共 39 行

program PMis;

uses
  Forms,
  mainut in 'mainut.pas' {mainfm},
  flashut in 'flashut.pas' {flashfm},
  loginut in 'loginut.pas' {loginfm},
  datacon in 'datacon.pas' {datamodal: TDataModule},
  editut in 'editut.pas' {editfm},
  seachut in 'seachut.pas' {seachfm},
  listut in 'listut.pas' {listfm},
  printut in 'printut.pas' {printfm},
  modyut in 'modyut.pas' {modyfm},
  userut in 'userut.pas' {userfm},
  addut in 'addut.pas' {addfm},
  dataut in 'dataut.pas' {datafm},
  backut in 'backut.pas' {backfm},
  aboutut in 'aboutut.pas' {AboutBox};

{$R *.res}

begin
  Application.Initialize;
  flashfm:=Tflashfm.create(application);
  flashfm.showmodal;
  flashfm.update;
  Application.Title := '职工信息管理系统';
  Application.CreateForm(Tdatamodal, datamodal);
  Application.CreateForm(Tmainfm, mainfm);
  Application.CreateForm(Tloginfm, loginfm);
  Application.CreateForm(Tmodyfm, modyfm);
  Application.CreateForm(Tuserfm, userfm);
  Application.CreateForm(Tbackfm, backfm);
  Application.CreateForm(TAboutBox, AboutBox);
  //Application.CreateForm(Teditfm, editfm);
  flashfm.free;
  Application.Run;
end.