prjpacs.dpr

一个简单得医院图像管理系统

program prjPACS;

uses
  Forms,
  uMain in 'uMain.pas' {frmMarrow},
  uPublicConnection in 'uPublicConnection.pas',
  uDictionary in 'uDictionary.pas',
  uPubFun in 'uPubFun.pas',
  ufrmDictionary in 'ufrmDictionary.pas' {frmDictionary},
  uPatient in 'uPatient.pas',
  uTestResult in 'uTestResult.pas',
  uPicture in 'uPicture.pas',
  uReference in 'uReference.pas',
  uBusinessObjectFactory in 'uBusinessObjectFactory.pas',
  ufrmPictureManage in 'ufrmPictureManage.pas' {frmPictureManage},
  uPictureZoom in 'uPictureZoom.pas' {frmZoom},
  uTemplet in 'uTemplet.pas',
  ufrmTemplet in 'ufrmTemplet.pas' {frmTemplet},
  ufrmQuery in 'ufrmQuery.pas' {frmQuery},
  uLMfrmMain in 'uLMfrmMain.pas' {frmLiveMarrowMain},
  uLiveMarrowPatient in 'uLiveMarrowPatient.pas',
  uLiveMarrowPicture in 'uLiveMarrowPicture.pas',
  ufrmPictureInputPath in 'ufrmPictureInputPath.pas' {frmSetPictureInputPath},
  ufrmLiveMarrowQuery in 'ufrmLiveMarrowQuery.pas' {frmLiveMarrowQuery},
  uLiveMarrowAdviceTemplet in 'uLiveMarrowAdviceTemplet.pas',
  ufrmLiveMarrowAdviceTemplet in 'ufrmLiveMarrowAdviceTemplet.pas' {frmAdviceTemplet},
  ufrmCellMarrow in 'ufrmCellMarrow.pas' {frmCellMarrowMain},
  uCellMarrowPatient in 'uCellMarrowPatient.pas',
  uCellMarrowPicture in 'uCellMarrowPicture.pas',
  ufrmCellMarrowQuery in 'ufrmCellMarrowQuery.pas' {frmCellMarrowQuery},
  uCellMarrowTemplet in 'uCellMarrowTemplet.pas',
  ufrmCellMarrowPrint in 'ufrmCellMarrowPrint.pas' {frmCellMarrowPrint},
  ufrmLiveMarrowPrint in 'ufrmLiveMarrowPrint.pas' {frmLiveMarrowPrint};

{$R *.res}

begin
  Application.Initialize;
  GlobalConnection:=TBasoConnection.Create;//创建公共连接
  Application.CreateForm(TfrmCellMarrowMain, frmCellMarrowMain);
  Application.Run;
end.