?? hc.~dpr
字號:
program hc;
uses
Forms,
Login in 'Login.pas' {LoginFrm},
Main in 'Main.pas' {MainFrm},
AddUser in 'AddUser.pas' {AddUserFrm},
DeleteUser in 'DeleteUser.pas' {DeleteUserFrm},
ModifyPassword in 'ModifyPassword.pas' {ModifyPasswordFrm},
DeleteTrain in 'DeleteTrain.pas' {DeleteTrainFrm},
ModifyTrain in 'ModifyTrain.pas' {ModifyTrainFrm},
QueryTrain in 'QueryTrain.pas' {QueryTrainFrm},
QueryIdTrain in 'QueryIdTrain.pas' {QueryIdTrainFrm},
reportt in 'reportt.pas' {ReportFrm},
BuyTicket in 'BuyTicket.pas' {BuyTicketFrm},
QueryPassenger in 'QueryPassenger.pas' {QueryPassengerFrm},
help in 'help.pas' {helpFrm};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TLoginFrm, LoginFrm);
Application.CreateForm(TMainFrm, MainFrm);
Application.CreateForm(TAddUserFrm, AddUserFrm);
Application.CreateForm(TDeleteUserFrm, DeleteUserFrm);
Application.CreateForm(TModifyPasswordFrm, ModifyPasswordFrm);
Application.CreateForm(TDeleteTrainFrm, DeleteTrainFrm);
Application.CreateForm(TModifyTrainFrm, ModifyTrainFrm);
Application.CreateForm(TQueryTrainFrm, QueryTrainFrm);
Application.CreateForm(TQueryIdTrainFrm, QueryIdTrainFrm);
Application.CreateForm(TReportFrm, ReportFrm);
Application.CreateForm(TBuyTicketFrm, BuyTicketFrm);
Application.CreateForm(TQueryPassengerFrm, QueryPassengerFrm);
Application.CreateForm(ThelpFrm, helpFrm);
Application.Run;
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -