manage.~dpr

来自「这是个才财务管理系统！可能是哪个语言！但是我不认识！」· ~DPR 代码 · 共 42 行

program manage;

uses
  Forms,
  Unit1 in 'Unit1.pas' {frm_main},
  Unit2 in 'Unit2.pas' {frm_sys},
  Unit3 in 'Unit3.pas' {frm_worker},
  Unit4 in 'Unit4.pas' {frm_model},
  Unit5 in 'Unit5.pas' {frm_setup},
  Unit6 in 'Unit6.pas' {frm_pwdcheck},
  Unit9 in 'Unit9.pas' {frm_chg},
  Unit10 in 'Unit10.pas' {frm_wage},
  Unit7 in 'Unit7.pas' {frm_sort},
  Unit11 in 'Unit11.pas' {frm_query},
  Unit8 in 'Unit8.pas' {frm_pass},
  Unit15 in 'Unit15.pas' {frm_graph},
  Unit16 in 'Unit16.pas' {rpt_wage: TQuickRep},
  Unit17 in 'Unit17.pas' {frm_add},
  Unit18 in 'Unit18.pas' {frm_add1};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(Tfrm_main, frm_main);
  Application.CreateForm(Tfrm_sys, frm_sys);
  Application.CreateForm(Tfrm_worker, frm_worker);
  Application.CreateForm(Tfrm_model, frm_model);
  Application.CreateForm(Tfrm_setup, frm_setup);
  Application.CreateForm(Tfrm_pwdcheck, frm_pwdcheck);
  Application.CreateForm(Tfrm_wage, frm_wage);
  Application.CreateForm(Tfrm_chg, frm_chg);
  Application.CreateForm(Tfrm_sort, frm_sort);
  Application.CreateForm(Tfrm_query, frm_query);
  Application.CreateForm(Tfrm_pass, frm_pass);
  Application.CreateForm(Tfrm_graph, frm_graph);
  Application.CreateForm(Trpt_wage, rpt_wage);
  Application.CreateForm(Tfrm_add, frm_add);
  Application.CreateForm(Tfrm_add1, frm_add1);
  Application.Run;
end.