libinfoadm.~dpr

来自「完整的delphi书籍源代码,大家有空的时候自己慢慢看看」· ~DPR 代码 · 共 32 行

program LibInfoAdm;

uses
  Forms,
  Login in 'Login.pas' {LoginFrm},
  EditBook in 'EditBook.pas' {EditBookFrm},
  EditStudent in 'EditStudent.pas' {EditStuFrm},
  BorrowOrder in 'BorrowOrder.pas' {BrwOrdFrm},
  QueryReturn in 'QueryReturn.pas' {QryRtnFrm},
  LibManage in 'LibManage.pas' {LibAdmFrm},
  LibService in 'LibService.pas' {LibSrvFrm},
  EditPassword in 'EditPassword.pas' {EditPswFrm},
  OrderRep in 'OrderRep.pas' {OrdRep},
  ExceedTimeRep in 'ExceedTimeRep.pas' {RetnRep};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TLoginFrm, LoginFrm);
  Application.CreateForm(TEditBookFrm, EditBookFrm);
  Application.CreateForm(TEditStuFrm, EditStuFrm);
  Application.CreateForm(TBrwOrdFrm, BrwOrdFrm);
  Application.CreateForm(TQryRtnFrm, QryRtnFrm);
  Application.CreateForm(TLibAdmFrm, LibAdmFrm);
  Application.CreateForm(TLibSrvFrm, LibSrvFrm);
  Application.CreateForm(TEditPswFrm, EditPswFrm);
  Application.CreateForm(TOrdRep, OrdRep);
  Application.CreateForm(TRetnRep, RetnRep);
  Application.Run;
end.