mdiapp.dpr

本文重点研究的是医院西药药房管理系统

program Mdiapp;

uses
  Forms,
  controls,
  Main in 'MAIN.PAS' {MainForm},
  Childwin in 'CHILDWIN.PAS' {MDIChild},
  About in 'about.pas' {AboutBox},
  datamz in 'datamz.pas' {DataMzf: TDataModule},
  XyMzInQr in 'XyMzInQr.pas' {XyMzInVali},
  XyMzZjInM in 'XyMzZjInM.pas' {XyMzZjIn},
  XyMzZjValiM in 'XyMzZjValiM.pas' {XyMzZjVali},
  datamz1 in 'datamz1.pas' {DataMzf1: TDataModule},
  XyMzLossM in 'XyMzLossM.pas' {XyMzLoss},
  XyMzLossValiM in 'XyMzLossValiM.pas' {XyMzLossVali},
  XyMzRefeM in 'XyMzRefeM.pas' {XyMzRefe},
  ZbKcPrinM in 'ZbKcPrinM.pas' {ZbKcPrin: TQuickRep},
  Day_NightM in 'Day_NightM.pas' {day_night},
  MzKcM in 'MzKcM.pas' {MzKc},
  KcPrinM in 'KcPrinM.pas' {KcPrin: TQuickRep},
  XyMzInQueryM in 'XyMzInQueryM.pas' {XyMzInQuery},
  RecipeQueryM in 'RecipeQueryM.pas' {RecipeQuery},
  RecipeYpQueryM in 'RecipeYpQueryM.pas' {RecipeYpQuery},
  datamz2 in 'datamz2.pas' {DataMzf2: TDataModule},
  XyMzZjInQueryM in 'XyMzZjInQueryM.pas' {XyMzZjInQuery},
  XyLossQueryM in 'XyLossQueryM.pas' {XyLossQuery},
  GzlQueryM in 'GzlQueryM.pas' {GzlQuery},
  YpOmenM in 'YpOmenM.pas' {YpOmen},
  PassM in 'PassM.pas' {Pass},
  ConnM in 'ConnM.pas' {Conn},
  RecipePrinM in 'RecipePrinM.pas' {RecipePrin: TQuickRep},
  XyMzInHzPrinM in 'XyMzInHzPrinM.pas' {XyMzInHzPrin: TQuickRep},
  RecipeHzPrinM in 'RecipeHzPrinM.pas' {RecipeHzPrin: TQuickRep},
  ZjHzPrinM in 'ZjHzPrinM.pas' {ZjHzPrin: TQuickRep},
  LossHzPrinM in 'LossHzPrinM.pas' {LossHzPrin: TQuickRep},
  DyPrinM in 'DyPrinM.pas' {DyPrin: TQuickRep},
  DateRecipeM in 'DateRecipeM.pas' {DateRecipe},
  TjQueryM in 'TjQueryM.pas' {TjQuery},
  GzlPrinM in 'GzlPrinM.pas' {GzlPrin: TQuickRep},
  GzlHzPrinM in 'GzlHzPrinM.pas' {GzlHzPrin: TQuickRep},
  DayRecipePrinM in 'DayRecipePrinM.pas' {DayRecipePrin: TQuickRep},
  ValiConn1M in 'ValiConn1M.pas' {ValiConn1},
  KcDyPrinM in 'KcDyPrinM.pas' {KcDyPrin: TQuickRep},
  XyZyInHzPrinM in 'XyZyInHzPrinM.pas' {XyZyInHzPrin: TQuickRep},
  TjPrinM in 'TjPrinM.pas' {TjPrin: TQuickRep};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := '西药门诊管理';
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TDataMzf, DataMzf);
  Application.CreateForm(TDataMzf1, DataMzf1);
  Application.CreateForm(TDataMzf2, DataMzf2);
  Application.CreateForm(TConn, Conn);
  Application.CreateForm(TKcPrin, KcPrin);
  Application.CreateForm(TZbKcPrin, ZbKcPrin);
  Application.CreateForm(TRecipePrin, RecipePrin);
  Application.CreateForm(TXyMzInHzPrin, XyMzInHzPrin);
  Application.CreateForm(TRecipeHzPrin, RecipeHzPrin);
  Application.CreateForm(TZjHzPrin, ZjHzPrin);
  Application.CreateForm(TLossHzPrin, LossHzPrin);
  Application.CreateForm(TDyPrin, DyPrin);
  Application.CreateForm(TGzlPrin, GzlPrin);
  Application.CreateForm(TGzlHzPrin, GzlHzPrin);
  Application.CreateForm(TDayRecipePrin, DayRecipePrin);
  Application.CreateForm(TValiConn1, ValiConn1);
  Application.CreateForm(TKcDyPrin, KcDyPrin);
  Application.CreateForm(TXyZyInHzPrin, XyZyInHzPrin);
  Application.CreateForm(TTjPrin, TjPrin);
  if conn.ShowModal<>mrOk then mainform.Close;
  Application.Run;
end.