📄 project1.~dpr
字号:
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {main_prog},
Unit2 in 'Unit2.pas' {user_login},
Unit3 in 'Unit3.pas' {create_user},
Unit4 in 'Unit4.pas' {DataModule4: TDataModule},
Unit5 in 'Unit5.pas' {modify_passwd},
Unit6 in 'Unit6.pas' {create_storage},
Unit7 in 'Unit7.pas' {storage_type},
Unit8 in 'Unit8.pas' {storage_number},
Unit9 in 'Unit9.pas' {short_storage},
Unit10 in 'Unit10.pas' {over_storage},
Unit11 in 'Unit11.pas' {act_sum},
Unit12 in 'Unit12.pas' {in_storage},
Unit13 in 'Unit13.pas' {in_sata},
Unit14 in 'Unit14.pas' {out_sata},
Unit15 in 'Unit15.pas' {Form15};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(Tmain_prog, main_prog);
Application.CreateForm(Tuser_login, user_login);
Application.CreateForm(Tcreate_user, create_user);
Application.CreateForm(TDataModule4, DataModule4);
Application.CreateForm(Tmodify_passwd, modify_passwd);
Application.CreateForm(Tcreate_storage, create_storage);
Application.CreateForm(Tstorage_type, storage_type);
Application.CreateForm(Tstorage_number, storage_number);
Application.CreateForm(Tshort_storage, short_storage);
Application.CreateForm(Tover_storage, over_storage);
Application.CreateForm(Tact_sum, act_sum);
Application.CreateForm(Tin_storage, in_storage);
Application.CreateForm(Tin_sata, in_sata);
Application.CreateForm(Tout_sata, out_sata);
Application.CreateForm(TForm15, Form15);
Application.Run;
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -