?? project1.dpr
字號:
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {frmmain},
Unit2 in 'Unit2.pas' {frmusers},
Unit3 in 'Unit3.pas' {dm1: TDataModule},
Unit4 in 'Unit4.pas' {frmlogin},
Unit5 in 'Unit5.pas' {frmoperates},
Unit6 in 'Unit6.pas' {frmedusers},
Unit7 in 'Unit7.pas' {frmedop},
Unit8 in 'Unit8.pas' {frmequipment},
Unit9 in 'Unit9.pas' {frmedeqp},
Unit10 in 'Unit10.pas' {frmuse_comp},
Unit11 in 'Unit11.pas' {frmpjc},
Unit12 in 'Unit12.pas' {frmsuemath};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(Tdm1, dm1);
Application.CreateForm(Tfrmlogin, frmlogin);
frmLogin.showmodal;
if frmLogin.ModalResult=1 then
begin
frmLogin.Free;
Application.CreateForm(Tfrmmain, frmmain);
end
else
frmLogin.Free;
Application.Run;
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -