cpc_hospital.dpr

DELPHI 编写的绣花厂管理软件

program cpc_hospital;

uses
  Forms,
  Unit_main in 'Unit_main.pas' {Form_main},
  Unit_login in 'unit_login.pas' {Form_login},
  Unit_jc_child in 'Unit_jc_child.pas' {form_jc_child},
  Unit_set_password in '基础设置\Unit_set_password.pas' {Form_Set_Password},
  Unit_jc_set in '基础设置\Unit_jc_set.pas' {form_jc_set},
  Unit_set_khzl in '基础设置\Unit_set_khzl.pas' {form_set_khzl},
  Unit_set_gys in '基础设置\Unit_set_gys.pas' {form_set_gys},
  Unit_set_login in '基础设置\Unit_set_login.pas' {form_set_login},
  Unit_set_fkfs in '基础设置\Unit_set_fkfs.pas' {form_set_fkfs},
  Unit_set_hp in '基础设置\Unit_set_hp.pas' {form_set_hp},
  Unit_input_cgsh in '数据录入\Unit_input_cgsh.pas' {form_input_cgsh},
  Unit_get_gys in '弹出式窗体\Unit_get_gys.pas' {Form_get_gys},
  Unit_get_sp in '弹出式窗体\Unit_get_sp.pas' {Form_get_sp},
  Unit_input_cgth in '数据录入\Unit_input_cgth.pas' {form_input_cgth},
  Unit_get_cgsp in '弹出式窗体\Unit_get_cgsp.pas' {Form_get_cgsp},
  Unit_get_kh in '弹出式窗体\Unit_get_kh.pas' {Form_get_kh},
  Unit_input_xs in '数据录入\Unit_input_xs.pas' {form_input_xssk},
  Unit_query_cgsh in '数据查询\Unit_query_cgsh.pas' {form_query_cgsh},
  Unit_query_cgth in '数据查询\Unit_query_cgth.pas' {form_query_cgth},
  Unit_query_xs in '数据查询\Unit_query_xs.pas' {form_query_xs},
  Unit_query_lr in '数据查询\Unit_query_lr.pas' {form_query_lr},
  Unit_query_qk in '数据查询\Unit_query_qk.pas' {form_query_qk},
  Unit_set_sjbf in '基础设置\Unit_set_sjbf.pas' {form_set_sjbf},
  Unit_set_sjhy in '基础设置\Unit_set_sjhy.pas' {form_set_sjhy},
  Unit_query_kc in '数据查询\Unit_query_kc.pas' {form_query_kc},
  Unit_set_about in '基础设置\Unit_set_about.pas' {AboutBox};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '绣花线厂管理系统';
  Application.CreateForm(TForm_main, Form_main);
  Application.CreateForm(TForm_get_gys, Form_get_gys);
  Application.CreateForm(TForm_get_sp, Form_get_sp);
  Application.CreateForm(TForm_get_cgsp, Form_get_cgsp);
  Application.CreateForm(TForm_get_kh, Form_get_kh);
  Application.CreateForm(TAboutBox, AboutBox);
  Application.Run;
end.