⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 project1.dpr

📁 ERP库存管理系统,分为ABC管理库存上下限报警等功能
💻 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 + -