project.dpr

是用于:毕业设计使用! 首先运行数据库还原目录中的PROJECT,将数据库还原 如果还原失败,则进行手动还原,数据库名:data 本次毕业设计任务是通过开发一个数据库校医院门诊收费管理系统

program Project;

uses
  Forms,
  windows,
  login in '..\操作员登陆\login.pas' {Form1},
  connect in '..\数据库连接\connect.pas' {dm: TDataModule},
  dmlogin in '..\操作员登陆\dmlogin.pas' {dm_login: TDataModule},
  main in 'main.pas' {main1},
  init in 'init.pas' {Form2},
  mzgh in '..\门诊收费管理\mzgh.pas' {mzghd},
  dmshoufei in '..\门诊收费管理\dmshoufei.pas' {dm_mz: TDataModule},
  mzshg in '..\门诊收费管理\mzshg.pas' {mzshgf},
  dmmzshg in '..\门诊收费管理\dmmzshg.pas' {dm_mzshg: TDataModule},
  book in '..\其它项\book.pas' {jishiben},
  calculate1 in '..\其它项\calculate1.pas' {calculate},
  yaorukugl in '..\药品管理\yaorukugl.pas' {rukuf},
  dmgl in '..\药品管理\dmgl.pas' {dm_yaopingl: TDataModule},
  yaotianxiedan in '..\药品管理\yaotianxiedan.pas' {yaodan},
  yaochukugldan in '..\药品管理\yaochukugldan.pas' {yaochukugl},
  yaochukudd in '..\药品管理\yaochukudd.pas' {yaochukud},
  ywrydj in '..\医务人员档案管理\ywrydj.pas' {register1},
  dmhospital11 in '..\医务人员档案管理\dmhospital11.pas' {dmhospital: TDataModule},
  ksgl11 in '..\医务人员档案管理\ksgl11.pas' {keshigldd},
  zwgl11 in '..\医务人员档案管理\zwgl11.pas' {zhiwugl},
  zbgl11 in '..\医务人员档案管理\zbgl11.pas' {ywzbgl},
  zyxkgl11 in '..\住院管理\zyxkgl11.pas' {zyyjgl},
  dmjiaokuan11 in '..\住院管理\dmjiaokuan11.pas' {dmjiaokuan: TDataModule},
  zyglzong11 in '..\住院管理\zyglzong11.pas' {zyglzong},
  dmzong11 in '..\住院管理\dmzong11.pas' {dmzong: TDataModule},
  cygl11 in '..\住院管理\cygl11.pas' {cygl},
  dmcygl11 in '..\住院管理\dmcygl11.pas' {dmcygl: TDataModule},
  yzgl11 in '..\其它项\yzgl11.pas' {yhzcgl},
  dmyhzc11 in '..\其它项\dmyhzc11.pas' {dmyhzc: TDataModule},
  mimagai11 in '..\其它项\mimagai11.pas' {mimagai},
  yztjgl11 in '..\院长查询\yztjgl11.pas' {yztjgl},
  dmtiaojia11 in '..\院长查询\dmtiaojia11.pas' {dmtiaojia: TDataModule},
  jinzhanggl11 in '..\其它项\jinzhanggl11.pas' {jinzhanggl},
  dmjinzhang11 in '..\其它项\dmjinzhang11.pas' {dmjinzhang: TDataModule},
  dmshuju11 in 'dmshuju11.pas' {dmshuju: TDataModule};

{$R *.res}

begin
  Application.Initialize;
  form2:=tform2.Create(application);
  form2.Show;
  form2.Update;
  sleep(4000);
  form2.Free;
  Application.CreateForm(Tdm, dm);
  Application.CreateForm(Tdm_login, dm_login);
  Application.CreateForm(Tdm_mz, dm_mz);
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(Tmain1, main1);
  Application.CreateForm(Tdm_mzshg, dm_mzshg);
  Application.CreateForm(Tdm_yaopingl, dm_yaopingl);
  Application.CreateForm(Tdmhospital, dmhospital);
  Application.CreateForm(Tdmjiaokuan, dmjiaokuan);
  Application.CreateForm(Tdmzong, dmzong);
  Application.CreateForm(Tdmcygl, dmcygl);
  Application.CreateForm(Tdmyhzc, dmyhzc);
  Application.CreateForm(Tmimagai, mimagai);
  Application.CreateForm(Tdmtiaojia, dmtiaojia);
  Application.CreateForm(Tdmjinzhang, dmjinzhang);
  Application.CreateForm(Tdmshuju, dmshuju);
  Application.Run;
end.