main.dpr

本系统主要划分为11个子模块：与操作员有关的文献刊物入库、出库、库结存和文献刊物查询

program main;

uses
  Forms,
  mainut in 'mainut.pas' {mainfm},
  logout in 'logout.pas' {logofm},
  loginut in 'loginut.pas' {loginfm},
  dataut in 'dataut.pas' {DataModule1: TDataModule},
  infindut in 'infindut.pas' {rkcxfm},
  chcxut in 'chcxut.pas' {ckcxfm},
  kccxut in 'kccxut.pas' {kccxfm},
  czyglut in 'czyglut.pas' {czyglfm},
  clbhut in 'clbhut.pas' {clbhfm},
  ghsut in 'ghsut.pas' {ghsglfm},
  bfhyut in 'bfhyut.pas' {sjbffm},
  xgmmut in 'xgmmut.pas' {xgmmfm},
  gyut in 'gyut.pas' {gyfm},
  yjcut in 'yjcut.pas' {jcfm},
  kcmxut in 'kcmxut.pas' {kcmxfm};

{$R *.res}

begin
  Application.Initialize;
  logofm:=Tlogofm.create(application);
  logofm.showmodal;
  logofm.update;
  Application.Title := '文献刊物查询系统';
  Application.HelpFile := '';
  Application.CreateForm(Tmainfm, mainfm);
  Application.CreateForm(Tloginfm, loginfm);
  Application.CreateForm(TDataModule1, DataModule1);
  Application.CreateForm(Tkcmxfm, kcmxfm);
  logofm.free;
  Application.Run;
end.