⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pmain.~dpr

📁 前言 随着旅游业的发展
💻 ~DPR
字号:
program PMain;

uses
  Forms,
  UMainForm in 'UMainForm.pas' {MainForm},
  UAdjust in 'UAdjust.pas' {FAdjust},
  UCheckIn in 'UCheckIn.pas' {FCheckIn},
  U5_3 in 'U5_3.pas' {F5_3},
  UPre in 'UPre.pas' {FPre},
  U1_3 in 'U1_3.pas' {F1_3},
  U1_4 in 'U1_4.pas' {F1_4},
  U3_1 in 'U3_1.pas' {F3_1},
  U5_1 in 'U5_1.pas' {F5_1},
  U2_1 in 'U2_1.pas' {F2_1},
  U1_8 in 'U1_8.pas' {F1_8},
  U2_2 in 'U2_2.pas' {F2_2},
  U3_2 in 'U3_2.pas' {F3_2},
  U4_8 in 'U4_8.pas' {F4_8},
  U5_5 in 'U5_5.pas' {F5_5},
  U5_6 in 'U5_6.pas' {F5_6},
  U1_7 in 'U1_7.pas' {F1_7},
  U1_6 in 'U1_6.pas' {F1_6},
  U2_3 in 'U2_3.pas' {F2_3},
  U3_8 in 'U3_8.pas' {F3_8},
  U3_3 in 'U3_3.pas' {F3_3},
  U3_5 in 'U3_5.pas' {F3_5},
  U3_6 in 'U3_6.pas' {F3_6},
  U3_10 in 'U3_10.pas' {F3_10},
  U4_1 in 'U4_1.pas' {F4_1},
  U4_3 in 'U4_3.pas' {F4_3},
  U4_4 in 'U4_4.pas' {F4_4},
  U4_5 in 'U4_5.pas' {F4_5},
  U4_7 in 'U4_7.pas' {F4_7},
  U3_9 in 'U3_9.pas' {F3_9},
  U3_7 in 'U3_7.pas' {F3_7},
  U3_5_1 in 'U3_5_1.pas' {Fzd},
  U5_2 in 'U5_2.pas' {F5_2},
  UDmo in 'UDmo.pas' {Dmo: TDataModule},
  Uinfo in 'Uinfo.pas' {Finfo},
  Ushow in 'Ushow.pas' {Fshow},
  ULogo in 'ULogo.pas' {Flogo},
  U6_2 in 'U6_2.pas' {F6_2},
  U6_3 in 'U6_3.PAS' {Fgy},
  Ureport in 'Ureport.pas' {QRListForm};

{$R *.res}
var
  Fshow:TFshow;

begin
  Application.Initialize;
  Application.Title := '酒店管理试用版';
  Application.CreateForm(TMainForm, MainForm);
  MainForm.Hide;
  Fshow:=TFshow.Create(Application);
  Fshow.Show;
  Fshow.Update;
  Application.CreateForm(TFlogo, Flogo);
  Application.CreateForm(TF6_2, F6_2);
  Application.CreateForm(TFgy, Fgy);
  Application.CreateForm(TF1_3, F1_3);
  Application.CreateForm(TF1_4, F1_4);
  Application.CreateForm(TF5_1, F5_1);
  Application.CreateForm(TF3_2, F3_2);
  Application.CreateForm(TF4_8, F4_8);
  Application.CreateForm(TF5_5, F5_5);
  Application.CreateForm(TF5_6, F5_6);
  Application.CreateForm(TF3_8, F3_8);
  Application.CreateForm(TF3_3, F3_3);
  Application.CreateForm(TF4_7, F4_7);
  Application.CreateForm(TF3_9, F3_9);
  Application.CreateForm(TF3_7, F3_7);
  Application.CreateForm(TFAdjust, FAdjust);
  Application.CreateForm(TFzd, Fzd);
  Application.CreateForm(TF5_2, F5_2);
  Application.CreateForm(TDmo, Dmo);
  Application.CreateForm(TFinfo, Finfo);
  Fshow.Close;
  Fshow.Free;
  Flogo.ShowModal;
  Application.Run;
end.

⌨️ 快捷键说明

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