hcgl.dpr

一个基于数据的药品行业管理系统,较全面,可供学习数据的开发人员参考消息

program HCGL;

uses
  Forms,
  main in 'main.pas' {frm_main},
  dataconfig in 'dataconfig.pas' {frm_config},
  date1 in 'date1.pas' {data: TDataModule},
  pass in 'pass.pas' {frm_pass},
  passmodify in 'passmodify.pas' {pasmodify},
  pubmotion in 'pubmotion.pas',
  ygcx in 'ygcx.pas' {frmygcx},
  ygda in 'ygda.pas' {frmyg},
  YGGZ in 'YGGZ.pas' {FRM_YGGZ},
  HCCK in 'HCCK.pas' {frm_hccK},
  csda in 'csda.pas' {frm_csda},
  HCXX in 'HCXX.pas' {frm_hcxx},
  jxccx in 'jxccx.pas' {frm_jxccx},
  hcbj in 'hcbj.pas' {frm_hcbj},
  hcckcx in 'hcckcx.pas' {frm_ckcx},
  HCCKD in 'HCCKD.pas' {frm_HCCKD},
  hcckdnew in 'hcckdnew.pas' {frm_hcckdnew},
  hcckdcx in 'hcckdcx.pas' {frm_hcckdcx},
  HCCKedit in 'HCCKedit.pas' {FRM_hcckedit},
  csht in '..\..\通友超市管理1.0\csht.pas' {frm_htgl},
  sprcdedit in 'sprcdedit.pas' {frm_sprcdedit},
  htglcx in 'htglcx.pas' {frm_htglcx},
  sprcdnew in 'sprcdnew.pas' {frm_sprcnew},
  zc in 'zc.pas' {frm_zc},
  sprcd in 'sprcd.pas' {frm_sprcd},
  czyda in 'czyda.pas' {frm_czyda},
  sprcdcx in 'sprcdcx.pas' {frm_sprcdcx};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(Tdata, data);
  if data.ADOC1.Connected=false then exit;
  Application.CreateForm(Tfrm_main, frm_main);
  Application.Run;
end.