s.~dpr

来自「资料室图书借阅管理系统」· ~DPR 代码 · 共 42 行

program Project1;

uses
  Forms,
  IWMain,
  ServerController in 'ServerController.pas' {IWServerController: TIWServerController},
  untlog in 'untlog.pas' {frmlog: TIWFormModuleBase},
  tempuntmain in 'tempuntmain.pas' {tempfrmmain: TIWAppForm},
  untluru in 'untluru.pas' {frmluru: TIWAppForm},
  untframe in 'untframe.pas' {IWFrame1: TFrame},
  untqkluru in 'untqkluru.pas' {frmqkluru: TIWAppForm},
  unqkbasic in 'unqkbasic.pas' {frmqkbasic: TIWAppForm},
  untpub in 'untpub.pas' {frmpub: TIWAppForm},
  untsbook in 'untsbook.pas' {frmsbook: TIWAppForm},
  untsread in 'untsread.pas' {frmsread: TIWAppForm},
  untnewbook in 'untnewbook.pas' {frmnewbook: TIWAppForm},
  untsqk in 'untsqk.pas' {frmsqk: TIWAppForm},
  untreturn in 'untreturn.pas' {frmreturn: TIWAppForm},
  untexpire in 'untexpire.pas' {frmexpire: TIWAppForm},
  untszglob in 'untszglob.pas' {frmszglob: TIWAppForm},
  untmgread in 'untmgread.pas' {frmmgread: TIWAppForm},
  untmguser in 'untmguser.pas' {frmmguser: TIWAppForm},
  untmgdept in 'untmgdept.pas' {frmmgdept: TIWAppForm},
  untpassword in 'untpassword.pas' {frmpassword: TIWAppForm},
  unttemp in 'unttemp.pas' {frmtemp: TIWAppForm},
  untguest in 'untguest.pas' {iwfrmguest: TIWAppForm},
  untreadifo in 'untreadifo.pas' {frmreadifo: TIWAppForm},
  RegObj in 'other\RegObj.pas',
  Ustring in 'other\Ustring.pas',
  untreg in 'untreg.pas' {frmreg: TIWAppForm};

{$R *.res}


begin
  Application.Initialize;
  Application.CreateForm(TformIWMain, formIWMain);
  Application.Run;

end.