dlmis.~dpr

来自「一个小型餐饮管理系统,可支持小票打印.还存在一些小问题,希望朋友们帮助完成. 」· ~DPR 代码 · 共 51 行

program DLMIS;

uses
  Forms,
  FrmLogin in 'FrmLogin.pas' {frm_login},
  Data_DL in 'Data_DL.pas' {DL_Data: TDataModule},
  Unit_Admin in 'Unit_Admin.pas',
  FrmMain in 'FrmMain.pas' {frm_main},
  FrmSystem in 'FrmSystem.pas' {Frm_System},
  FrmKDMaster in 'FrmKDMaster.pas' {frm_KDMaster},
  Unit_CT in 'Unit_CT.pas',
  Unit_XF in 'Unit_XF.pas',
  FrmJz in 'FrmJz.pas' {frm_jz},
  FrmXf in 'FrmXf.pas' {frm_XF},
  Unit_CP in 'Unit_CP.pas',
  FrmSpTypeAdd in 'FrmSpTypeAdd.pas' {Frm_SpType},
  FrmBKYD in 'FrmBKYD.pas' {frm_BKYD},
  Unit_YD in 'Unit_YD.pas',
  frmXfCpRate in 'frmXfCpRate.pas' {frm_XfCpRate},
  FrmCpMemo in 'FrmCpMemo.pas' {frm_CpMemo},
  Unit_Share in 'Unit_Share.pas',
  Unit_Jz in 'Unit_Jz.pas',
  FrmUnionJz in 'FrmUnionJz.pas' {frm_unionJz},
  FrmUpdatePwd in 'FrmUpdatePwd.pas' {frm_UpdatePwd},
  FrmLocksys in 'FrmLocksys.pas' {Frm_Locksys},
  Frmjob in 'Frmjob.pas' {frm_job},
  Unit_JOB in 'Unit_JOB.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.Title := 'goldsway';
  Application.CreateForm(Tfrm_login, frm_login);
  Application.CreateForm(TDL_Data, DL_Data);
  Application.CreateForm(Tfrm_main, frm_main);
  Application.CreateForm(TFrm_System, Frm_System);
  Application.CreateForm(Tfrm_KDMaster, frm_KDMaster);
  Application.CreateForm(Tfrm_jz, frm_jz);
  Application.CreateForm(Tfrm_XF, frm_XF);
  Application.CreateForm(TFrm_SpType, Frm_SpType);
  Application.CreateForm(Tfrm_BKYD, frm_BKYD);
  Application.CreateForm(Tfrm_XfCpRate, frm_XfCpRate);
  Application.CreateForm(Tfrm_CpMemo, frm_CpMemo);
  Application.CreateForm(Tfrm_unionJz, frm_unionJz);
  Application.CreateForm(Tfrm_UpdatePwd, frm_UpdatePwd);
  Application.CreateForm(TFrm_Locksys, Frm_Locksys);
  Application.CreateForm(Tfrm_job, frm_job);
  Application.Run;
end.