📄 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.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -