mdiapp.dpr

来自「1. 直接安装并运行案例程序 运行“安装程序”文件夹中的setup.exe」· DPR 代码 · 共 48 行

program Mdiapp;

uses
  Forms,
  MAIN in 'MAIN.PAS' {MainForm},
  CHILDWIN in 'CHILDWIN.PAS' {MDIChild},
  about in 'about.pas' {AboutBox},
  login in 'login.pas' {frmLogIn},
  changePwd in 'changePwd.pas' {frmChangePwd},
  comFunc in 'comFunc.pas',
  registerCompany in 'registerCompany.pas' {frmRegisterCompany},
  authorization in 'authorization.pas' {frmAuthorization},
  needPlan in 'needPlan.pas' {frmNeedPlan},
  stockPlan in 'stockPlan.pas' {frmStockPlan},
  buyPlan in 'buyPlan.pas' {frmBuyPlan},
  wzinfo in 'wzinfo.pas' {frmWzInfo},
  bminfo in 'bminfo.pas' {frmBmInfo},
  addStock in 'addStock.pas' {frmAddStock},
  deleteStock in 'deleteStock.pas' {frmDeleteStock},
  queryWz in 'queryWz.pas' {frmQueryWz},
  sendMoney in 'sendMoney.pas' {frmSendMoney},
  addMoney in 'addMoney.pas' {frmAddMoney},
  DBCtrlsEh in 'DBCtrlsEh.pas',
  checkMoney in 'checkMoney.pas' {frmCheckMoney},
  moneyRep in 'moneyRep.pas' {frmMoneyRep},
  wzRep in 'wzRep.pas' {frmWzRep},
  mingxi in 'mingxi.pas' {frmMingxi};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TAboutBox, AboutBox);
  Application.CreateForm(TfrmChangePwd, frmChangePwd);
  Application.CreateForm(TfrmRegisterCompany, frmRegisterCompany);
  Application.CreateForm(TfrmAuthorization, frmAuthorization);
  Application.CreateForm(TfrmStockPlan, frmStockPlan);
  Application.CreateForm(TfrmWzInfo, frmWzInfo);
  Application.CreateForm(TfrmBmInfo, frmBmInfo);
  Application.CreateForm(TfrmAddStock, frmAddStock);
  Application.CreateForm(TfrmDeleteStock, frmDeleteStock);
  Application.CreateForm(TfrmQueryWz, frmQueryWz);
  Application.CreateForm(TfrmSendMoney, frmSendMoney);
  Application.CreateForm(TfrmAddMoney, frmAddMoney);
  Application.Run;
end.