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

📄 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' {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 + -