📄 kcgl_frm_form1.dfm
字号:
end
object GroupBox11: TGroupBox
Left = 304
Top = 1
Width = 489
Height = 504
Caption = #33647#21697#20449#24687
TabOrder = 3
object KCGL_frm_dbgMedicineInfo: TDBGrid
Left = 5
Top = 14
Width = 478
Height = 239
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 = 0
Top = 256
Width = 489
Height = 249
Caption = #32570#36135#20449#24687
TabOrder = 1
object KCGL_frm_dbgMedicinestoreInfo: TDBGrid
Left = 2
Top = 14
Width = 487
Height = 232
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 = 13
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 = 13
Width = 48
Height = 13
Caption = #35786#25152#21517#65306
end
object GroupBox2: TGroupBox
Left = 0
Top = 40
Width = 297
Height = 223
Caption = #35814#32454#20449#24687
TabOrder = 0
object Label4: TLabel
Left = 43
Top = 22
Width = 48
Height = 13
Caption = #39033#30446#21495#65306
end
object Label5: TLabel
Left = 29
Top = 62
Width = 60
Height = 13
Caption = #39033#30446#21517#31216#65306
end
object Label6: TLabel
Left = 28
Top = 99
Width = 60
Height = 13
Caption = #23384#20648#25968#37327#65306
end
object Label7: TLabel
Left = 45
Top = 182
Width = 39
Height = 13
Caption = #25551' '#36848#65306
end
object Label8: TLabel
Left = 38
Top = 142
Width = 48
Height = 13
Caption = #26631#35782#21495#65306
end
object DBEdit1: TDBEdit
Left = 104
Top = 18
Width = 121
Height = 21
DataField = 'ItemId'
DataSource = DataSource1
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 104
Top = 56
Width = 121
Height = 21
DataField = 'IteName'
DataSource = DataSource1
TabOrder = 1
end
object DBEdit4: TDBEdit
Left = 102
Top = 92
Width = 121
Height = 21
DataField = 'ItemCount'
DataSource = DataSource1
TabOrder = 2
end
object DBMemo1: TDBMemo
Left = 98
Top = 169
Width = 185
Height = 49
DataField = 'ItemDesc'
DataSource = DataSource1
TabOrder = 3
end
object DBComboBox4: TDBComboBox
Left = 104
Top = 136
Width = 145
Height = 21
DataField = 'DifferNumber'
DataSource = DataSource1
ItemHeight = 13
Items.Strings = (
'0'
'1'
'2'
'3'
'4')
TabOrder = 4
end
end
object GroupBox1: TGroupBox
Left = 0
Top = 398
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 = 70
Width = 75
Height = 25
Caption = #21024' '#38500
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 152
Top = 70
Width = 75
Height = 25
Caption = #21462' '#28040
TabOrder = 3
OnClick = Button4Click
end
end
object GroupBox5: TGroupBox
Left = 0
Top = 496
Width = 793
Height = 25
TabOrder = 2
end
object GroupBox8: TGroupBox
Left = 328
Top = 0
Width = 462
Height = 505
Caption = #35814#32454#20449#24687
TabOrder = 3
object DBGrid2: TDBGrid
Left = 5
Top = 17
Width = 473
Height = 268
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 = 296
Width = 473
Height = 209
Caption = #35746#36135#20449#24687
TabOrder = 1
object DBGrid6: TDBGrid
Left = 0
Top = 15
Width = 473
Height = 184
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
end
end
object GroupBox14: TGroupBox
Left = 0
Top = 263
Width = 297
Height = 137
TabOrder = 4
object Label9: TLabel
Left = 25
Top = 20
Width = 60
Height = 13
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -