pjmanager.~dpr

来自「本软件专门用于管理餐饮行业的点菜单、加菜单酒水单等重要票据的领用及回收情况」· ~DPR 代码 · 共 39 行

~DPR
39
字号
program pjmanager;

uses
  Forms,
  pjmagagerunit in 'pjmagagerunit.pas' {Form1},
  personunit in 'personunit.pas' {personform},
  aboutunit in 'aboutunit.pas' {aboutform},
  typeunit in 'typeunit.pas' {typeform},
  lydjunit in 'lydjunit.pas' {lydjform},
  numberfwunit in 'numberfwunit.pas' {numberfwform},
  reciveunit in 'reciveunit.pas' {reciveform},
  unreciveunit in 'unreciveunit.pas' {unreciveform},
  guestform in 'guestform.pas' {guestforms},
  updatepsdunit in 'updatepsdunit.pas' {updatepsdform},
  userunit in 'userunit.pas' {userform},
  Unit1 in 'Unit1.pas' {mydata: TDataModule},
  deleteunit in 'deleteunit.pas' {deleteform};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '票据管理系统';
  Application.CreateForm(Tmydata, mydata);
  Application.CreateForm(Tguestforms, guestforms);
  Application.CreateForm(Taboutform, aboutform);
  Application.CreateForm(Tuserform, userform);
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(Tpersonform, personform);
  Application.CreateForm(Ttypeform, typeform);
  Application.CreateForm(Tlydjform, lydjform);
  Application.CreateForm(Tnumberfwform, numberfwform);
  Application.CreateForm(Treciveform, reciveform);
  Application.CreateForm(Tunreciveform, unreciveform);
  Application.CreateForm(Tupdatepsdform, updatepsdform);
  Application.CreateForm(Tdeleteform, deleteform);
  Application.Run;
end.

⌨️ 快捷键说明

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