hotel.~dpr
来自「完整的delphi书籍源代码,大家有空的时候自己慢慢看看」· ~DPR 代码 · 共 38 行
~DPR
38 行
program hotel;
uses
Forms,
login in 'login.pas' {loginFrm},
UserM in 'UserM.pas' {UserMFrm},
ManageM in 'ManageM.pas' {ManageMFrm},
About in 'About.pas' {AboutFrm},
RoomAdd in 'RoomAdd.pas' {RoomAddFrm},
RoomModify in 'RoomModify.pas' {RoomModifyFrm},
Operator in 'Operator.pas' {OperatorFrm},
Report in 'Report.pas' {ReportFrm},
DB_Frm in 'DB_Frm.pas' {DBFrm},
Restaurant in 'Restaurant.pas' {RestFrm},
RoomYud in 'RoomYud.pas' {RoomYudFrm},
RoomRuzhu in 'RoomRuzhu.pas' {RoomRuFrm},
tuifang in 'tuifang.pas' {tuifangFrm};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TloginFrm, loginFrm);
Application.CreateForm(TDBFrm, DBFrm);
Application.CreateForm(TUserMFrm, UserMFrm);
Application.CreateForm(TManageMFrm, ManageMFrm);
Application.CreateForm(TAboutFrm, AboutFrm);
Application.CreateForm(TRoomAddFrm, RoomAddFrm);
Application.CreateForm(TRoomModifyFrm, RoomModifyFrm);
Application.CreateForm(TOperatorFrm, OperatorFrm);
Application.CreateForm(TReportFrm, ReportFrm);
Application.CreateForm(TRestFrm, RestFrm);
Application.CreateForm(TRoomYudFrm, RoomYudFrm);
Application.CreateForm(TRoomRuFrm, RoomRuFrm);
Application.CreateForm(TtuifangFrm, tuifangFrm);
Application.Run;
end.
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?