📄 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' {data_update},
Unit16 in 'Unit16.pas' {out_storage},
Unit17 in 'Unit17.pas' {check_sata},
Unit18 in 'Unit18.pas' {check_input},
Unit19 in 'Unit19.pas' {storage_sum},
Unit20 in 'Unit20.pas' {supply_wokes},
Unit21 in 'Unit21.pas' {user_wokes},
Unit22 in 'Unit22.pas' {analyes_abc},
Unit23 in 'Unit23.pas' {analyes_history},
Unit24 in 'Unit24.pas' {storage_find},
Unit25 in 'Unit25.pas' {data_print},
Unit26 in 'Unit26.pas' {help},
Unit27 in 'Unit27.pas' {about};
{$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(Tdata_update, data_update);
Application.CreateForm(Tout_storage, out_storage);
Application.CreateForm(Tcheck_sata, check_sata);
Application.CreateForm(Tcheck_input, check_input);
Application.CreateForm(Tstorage_sum, storage_sum);
Application.CreateForm(Tsupply_wokes, supply_wokes);
Application.CreateForm(Tuser_wokes, user_wokes);
Application.CreateForm(Tanalyes_abc, analyes_abc);
Application.CreateForm(Tanalyes_history, analyes_history);
Application.CreateForm(Tstorage_find, storage_find);
Application.CreateForm(Tdata_print, data_print);
Application.CreateForm(Thelp, help);
Application.CreateForm(Tabout, about);
Application.Run;
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -