bm_office.dpr

来自「Delphi办公管理系统」· DPR 代码 · 共 41 行

program BM_OFFICE;

uses
  Forms,
  BM_OFICEU in 'BM_OFICEU.pas' {BM_OFFICEF},
  BM_DMU in 'BM_DMU.PAS' {DM: TDataModule},
  BM_LOGINU in 'BM_LOGINU.pas' {BM_LOGINF},
  BM_FLASHU in 'BM_FLASHU.pas' {BM_FLASHF},
  BM_ZHIYUANU in 'BM_ZHIYUANU.pas' {BM_ZHIYUANF},
  BM_BUMENU in 'BM_BUMENU.pas' {BM_BENMENF},
  BM_QUANXIANU in 'BM_QUANXIANU.pas' {BM_QUANXIANF},
  BM_HINTU in 'BM_HINTU.pas' {BM_HINTF},
  BM_PRIU in 'BM_PRIU.pas' {BM_PRIF},
  BM_PRIU_ADDU in 'BM_PRIU_ADDU.pas' {BM_PRIF_ADDF},
  BM_ZHIYUAN_ADDU in 'BM_ZHIYUAN_ADDU.pas' {BM_ZHIYUAN_ADDF},
  BM_POSTU in 'BM_POSTU.pas' {BM_POSTF},
  BM_CHANGEFILEU in 'BM_CHANGEFILEU.pas' {BM_CHANGEFILEF},
  BM_TIMEU in 'BM_TIMEU.pas' {BM_TIMEF},
  BM_MONGTHU in 'BM_MONGTHU.pas' {BM_MONGTHF},
  BM_TELU in 'BM_TELU.pas' {BM_TELF},
  BM_EXCELU in 'BM_EXCELU.pas' {BM_EXCELF},
  BM_ABOUTU in 'BM_ABOUTU.pas' {BM_ABOUTF},
  BM_IDU in 'BM_IDU.pas' {BM_IDF},
  printu in 'printu.pas' {printF},
  printgz in 'printgz.pas' {printg},
  printd in 'printd.pas' {printdd};

{$R *.res}

begin
  Application.Initialize;
  BM_flashf:=TBM_flashF.create(Application);
  BM_flashF.show;
  BM_flashF.update;
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TBM_OFFICEF, BM_OFFICEF);
  Application.CreateForm(TBM_MONGTHF, BM_MONGTHF);
  Application.CreateForm(Tprintdd, printdd);
  Application.Run;
end.