📄 kcgl_frm_form1.~dfm
字号:
end
end
object GroupBox11: TGroupBox
Left = 305
Top = 1
Width = 392
Height = 424
Caption = #33647#21697#20449#24687
TabOrder = 3
object KCGL_frm_dbgMedicineInfo: TDBGrid
Left = 4
Top = 18
Width = 381
Height = 187
DataSource = KCGL_frm_ds1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'MedicineId'
Title.Alignment = taCenter
Title.Caption = #33647#21697#21495
Width = 66
Visible = True
end
item
Expanded = False
FieldName = 'MedicineName'
Title.Alignment = taCenter
Title.Caption = #33647#21697#21517
Width = 70
Visible = True
end
item
Expanded = False
FieldName = 'MedicineDesc'
Title.Alignment = taCenter
Title.Caption = #25551#36848
Width = 82
Visible = True
end
item
Expanded = False
FieldName = 'MedicineQuantity'
Title.Alignment = taCenter
Title.Caption = #35745#37327
Width = 127
Visible = True
end
item
Expanded = False
FieldName = 'Prescription'
Title.Alignment = taCenter
Title.Caption = #37197#26041
Width = 159
Visible = True
end
item
Expanded = False
FieldName = 'MedicineCount'
Title.Alignment = taCenter
Title.Caption = #25968#37327
Width = 121
Visible = True
end>
end
object GroupBox21: TGroupBox
Left = 4
Top = 205
Width = 377
Height = 220
Caption = #32570#36135#20449#24687
TabOrder = 1
object KCGL_frm_dbgMedicinestoreInfo: TDBGrid
Left = 4
Top = 12
Width = 372
Height = 207
DataSource = KCGL_frm_ds2
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'BookId'
Title.Alignment = taCenter
Title.Caption = #24207#21495
Visible = True
end
item
Expanded = False
FieldName = 'MedicineId'
Title.Alignment = taCenter
Title.Caption = #33647#21697#21495
Width = 136
Visible = True
end
item
Expanded = False
FieldName = 'RecordLeve'
Title.Alignment = taCenter
Title.Caption = #35760#24405#32423#21035
Width = 102
Visible = True
end
item
Expanded = False
FieldName = 'OrderCount'
Title.Alignment = taCenter
Title.Caption = #35760#24405#25968#37327
Width = 185
Visible = True
end
item
Expanded = False
FieldName = 'OrderCost'
Title.Alignment = taCenter
Title.Caption = #36153#29992
Width = 276
Visible = True
end>
end
end
end
object KCGL_frm_cmbClinicId: TComboBox
Left = 99
Top = 13
Width = 145
Height = 21
ItemHeight = 0
TabOrder = 4
Text = 'c00001'
OnChange = KCGL_frm_cmbClinicIdChange
end
end
object TabSheet3: TTabSheet
Caption = #29992#21697#19982#38750#29992#21697
ImageIndex = 2
object Label29: TLabel
Left = 45
Top = 5
Width = 48
Height = 13
Caption = #35786#25152#21517#65306
end
object GroupBox2: TGroupBox
Left = 8
Top = 24
Width = 297
Height = 193
Caption = #35814#32454#20449#24687
TabOrder = 0
object Label4: TLabel
Left = 22
Top = 22
Width = 48
Height = 13
Caption = #39033#30446#21495#65306
end
object Label5: TLabel
Left = 8
Top = 52
Width = 60
Height = 13
Caption = #39033#30446#21517#31216#65306
end
object Label6: TLabel
Left = 9
Top = 81
Width = 60
Height = 13
Caption = #23384#20648#25968#37327#65306
end
object Label7: TLabel
Left = 26
Top = 134
Width = 39
Height = 13
Caption = #25551' '#36848#65306
end
object Label8: TLabel
Left = 19
Top = 108
Width = 48
Height = 13
Caption = #26631#35782#21495#65306
end
object DBEdit1: TDBEdit
Left = 76
Top = 18
Width = 121
Height = 21
DataField = 'ItemId'
DataSource = DataSource1
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 77
Top = 48
Width = 121
Height = 21
DataField = 'IteName'
DataSource = DataSource1
TabOrder = 1
end
object DBEdit4: TDBEdit
Left = 78
Top = 76
Width = 121
Height = 21
DataField = 'ItemCount'
DataSource = DataSource1
TabOrder = 2
end
object DBMemo1: TDBMemo
Left = 76
Top = 137
Width = 185
Height = 49
DataField = 'ItemDesc'
DataSource = DataSource1
TabOrder = 3
end
object DBComboBox4: TDBComboBox
Left = 77
Top = 104
Width = 145
Height = 21
DataField = 'DifferNumber'
DataSource = DataSource1
ItemHeight = 13
Items.Strings = (
'0'
'1'
'2'
'3'
'4')
TabOrder = 4
end
object CheckBox2: TCheckBox
Left = 216
Top = 18
Width = 71
Height = 17
Caption = #35814#32454#23450#36135
TabOrder = 5
end
end
object GroupBox1: TGroupBox
Left = 8
Top = 338
Width = 297
Height = 98
Caption = #25805' '#20316
TabOrder = 1
object Button1: TButton
Left = 48
Top = 22
Width = 75
Height = 25
Caption = #28155' '#21152
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 152
Top = 22
Width = 75
Height = 25
Caption = #20462' '#25913
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 48
Top = 62
Width = 75
Height = 25
Caption = #21024' '#38500
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 152
Top = 62
Width = 75
Height = 25
Caption = #21462' '#28040
TabOrder = 3
OnClick = Button4Click
end
end
object GroupBox8: TGroupBox
Left = 321
Top = 2
Width = 462
Height = 439
Caption = #35814#32454#20449#24687
TabOrder = 2
object DBGrid2: TDBGrid
Left = 0
Top = 16
Width = 369
Height = 184
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ItemId'
Title.Caption = #39033#30446#21495
Width = 54
Visible = True
end
item
Expanded = False
FieldName = 'IteName'
Title.Caption = #39033#30446#21517#31216
Width = 97
Visible = True
end
item
Expanded = False
FieldName = 'ItemDesc'
Title.Caption = #25551#36848
Width = 133
Visible = True
end
item
Expanded = False
FieldName = 'ItemCount'
Title.Caption = #23384#20648#25968#37327
Width = 126
Visible = True
end
item
Expanded = False
FieldName = 'DifferNumber'
Title.Caption = #26631#35782#21495
Width = 207
Visible = True
end>
end
object GroupBox22: TGroupBox
Left = 5
Top = 202
Width = 473
Height = 231
Caption = #35746#36135#20449#24687
TabOrder = 1
object DBGrid6: TDBGrid
Left = 4
Top = 16
Width = 366
Height = 217
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
Title.Caption = #29992#21697#25110#38750#29992#21697#21495
Width = 136
Visible = True
end
item
Expanded = False
Title.Caption = #23450#36135#31243#24230
Width = 115
Visible = True
end
item
Expanded = False
Title.Caption = #35746#36135#25968#37327
Width = 146
Visible = True
end
item
Expanded = False
Title.Caption = #23450#36135#36153#29992
Width = 258
Visible = True
end>
end
end
object DBNavigator1: TDBNavigator
Left = 216
Top = 112
Width = 224
Height = 25
DataSource = DataSource1
VisibleButtons = [nbInsert, nbDelete, nbPost, nbCancel]
TabOrder = 2
Visible = False
end
end
object GroupBox14: TGroupBox
Left = 8
Top = 216
Width = 297
Height = 114
TabOrder = 3
object Label9: TLabel
Left = 14
Top = 20
Width = 60
Height = 13
Caption = #23450#36135#31243#24230#65306
end
object Label25: TLabel
Left = 10
Top = 51
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -