?? ufrmlivemarrowquery.dfm
字號:
object frmLiveMarrowQuery: TfrmLiveMarrowQuery
Left = 202
Top = 212
Width = 472
Height = 267
Caption = #26597#35810
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object Label4: TLabel
Left = 15
Top = 9
Width = 48
Height = 12
Caption = #26816#39564#26085#26399
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 226
Top = 8
Width = 24
Height = 13
Alignment = taCenter
AutoSize = False
Caption = #9473
end
object dtpStart: TDateTimePicker
Left = 70
Top = 6
Width = 157
Height = 20
Date = 37885.446218159720000000
Time = 37885.446218159720000000
DateFormat = dfLong
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
TabStop = False
end
object dtpEnd: TDateTimePicker
Left = 248
Top = 6
Width = 157
Height = 20
Date = 37885.446218159720000000
Time = 37885.446218159720000000
DateFormat = dfLong
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
TabStop = False
end
object GroupBox4: TGroupBox
Left = 7
Top = 32
Width = 222
Height = 171
Caption = #30149#20154#20449#24687
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 2
object Label6: TLabel
Left = 8
Top = 17
Width = 48
Height = 12
Caption = #23601#35786#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 8
Top = 39
Width = 48
Height = 12
Caption = #22995' '#21517
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 8
Top = 61
Width = 48
Height = 12
Caption = #24615' '#21035
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 8
Top = 83
Width = 48
Height = 12
Caption = #31185' '#21035
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 8
Top = 104
Width = 48
Height = 12
Caption = #30149' '#21306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 8
Top = 126
Width = 48
Height = 12
Caption = #24202' '#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 8
Top = 148
Width = 48
Height = 12
Caption = #20020#24202#35786#26029
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object edtCaseCode: TEdit
Left = 115
Top = 13
Width = 102
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object edtName: TEdit
Left = 60
Top = 35
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object edtSicknessBed: TEdit
Left = 60
Top = 121
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
end
object cboDepartment: TComboBox
Left = 60
Top = 78
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 3
OnExit = cboDepartmentExit
end
object cboSex: TComboBox
Left = 60
Top = 56
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 2
Items.Strings = (
#30007
#22899)
end
object cboDiagnosis: TComboBox
Left = 60
Top = 143
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 6
OnExit = cboDiagnosisExit
end
object cboSicknessSection: TComboBox
Left = 60
Top = 100
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 4
OnExit = cboSicknessSectionExit
end
object cboOutOrIn: TComboBox
Left = 60
Top = 13
Width = 55
Height = 20
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 7
Items.Strings = (
#38376#35786
#20303#38498
' ')
end
end
object GroupBox5: TGroupBox
Left = 233
Top = 32
Width = 222
Height = 171
Caption = #25253#21578#20449#24687
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 3
object Label14: TLabel
Left = 8
Top = 39
Width = 48
Height = 12
Caption = #26631#26412#26469#28304
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 8
Top = 61
Width = 48
Height = 12
Caption = #36865#26816#21307#24072
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 8
Top = 83
Width = 48
Height = 12
Caption = #26816#39564#21307#24072
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 8
Top = 104
Width = 48
Height = 12
Caption = #22791' '#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 8
Top = 17
Width = 48
Height = 12
Caption = #26816#39564#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 168
Top = 16
Width = 6
Height = 12
end
object cboSampleSource: TComboBox
Left = 60
Top = 35
Width = 157
Height = 20
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 0
Items.Strings = (
#33016#39592
#39618#39592
#26840#31361
' ')
end
object cboSendDoctor: TComboBox
Left = 60
Top = 56
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 1
OnExit = cboSendDoctorExit
end
object cboTestDoctor: TComboBox
Left = 60
Top = 78
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 2
OnExit = cboTestDoctorExit
end
object edtTestNo: TEdit
Left = 60
Top = 13
Width = 157
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object memReport: TMemo
Left = 9
Top = 118
Width = 208
Height = 47
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Lines.Strings = (
'memReport')
ParentFont = False
TabOrder = 4
end
end
object btnQuery: TButton
Left = 9
Top = 210
Width = 75
Height = 25
Caption = #26597#35810'(&Q)'
Default = True
TabOrder = 4
OnClick = btnQueryClick
end
object btnReset: TButton
Left = 106
Top = 210
Width = 75
Height = 25
Caption = #37325#32622'(&R)'
TabOrder = 5
OnClick = btnResetClick
end
object btnClose: TButton
Left = 379
Top = 210
Width = 75
Height = 25
Cancel = True
Caption = #20851#38381'(Esc)'
TabOrder = 6
OnClick = btnCloseClick
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -