project1.~dpr

来自「商场管理 内容:通过商场入口和用户入口实现」· ~DPR 代码 · 共 38 行

~DPR
38
字号
program Project1;

uses
  Forms,
  manage in 'manage.pas' {main},
  Unit2 in 'Unit2.pas' {frm_sys},
  Unit3 in 'Unit3.pas' {frm_product},
  Unit1 in 'Unit1.pas' {frm_proclass},
  Unit4 in 'Unit4.pas' {frm_workerinfor},
  Unit5 in 'Unit5.pas' {frm_workerclass},
  Unit6 in 'Unit6.pas' {frm_departmentinfor},
  Unit7 in 'Unit7.pas' {frm_saleinfor},
  Unit8 in 'Unit8.pas' {frm_sort},
  Unit9 in 'Unit9.pas' {frm_query},
  Unit10 in 'Unit10.pas' {frm_pwdcheck},
  Unit11 in 'Unit11.pas' {frm_pass},
  Unit12 in 'Unit12.pas' {frm_change};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(Tmain, main);
  Application.CreateForm(Tfrm_sys, frm_sys);
  Application.CreateForm(Tfrm_product, frm_product);
  Application.CreateForm(Tfrm_proclass, frm_proclass);
  Application.CreateForm(Tfrm_workerinfor, frm_workerinfor);
  Application.CreateForm(Tfrm_workerclass, frm_workerclass);
  Application.CreateForm(Tfrm_departmentinfor, frm_departmentinfor);
  Application.CreateForm(Tfrm_saleinfor, frm_saleinfor);
  Application.CreateForm(Tfrm_sort, frm_sort);
  Application.CreateForm(Tfrm_query, frm_query);
  Application.CreateForm(Tfrm_pwdcheck, frm_pwdcheck);
  Application.CreateForm(Tfrm_pass, frm_pass);
  Application.CreateForm(Tfrm_change, frm_change);
  Application.Run;
end.

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?