📄 unitmb.dfm
字号:
Width = 70
end>
end
object dbGoods: TDBGridEh
Left = 0
Top = 0
Width = 88
Height = 298
Align = alLeft
Color = clBlue
DataSource = DataE2.dsType
FixedColor = 9090758
Font.Charset = GB2312_CHARSET
Font.Color = clWhite
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
FooterColor = 16052953
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = #23435#20307
FooterFont.Style = []
HorzScrollBar.Visible = False
Options = []
OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghEnterAsTab]
ParentFont = False
ParentShowHint = False
ShowHint = True
SumList.Active = True
TabOrder = 1
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWhite
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
VertScrollBar.VisibleMode = sbNeverShowEh
OnCellClick = dbGoodsCellClick
Columns = <
item
AutoFitColWidth = False
EditButtons = <>
EndEllipsis = True
FieldName = 'codeName'
Footers = <
item
Alignment = taCenter
Value = #21512#35745#65306
ValueType = fvtStaticText
end>
Title.Alignment = taCenter
Title.Caption = #32534#30721
ToolTips = True
Width = 259
end>
end
object DBComboBoxEh1: TDBComboBoxEh
Left = 418
Top = 23
Width = 49
Height = 21
Ctl3D = True
DropDownBox.AutoDrop = True
EditButtons = <>
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
Flat = True
ParentCtl3D = False
ParentFont = False
TabOrder = 2
Visible = False
OnChange = DBComboBoxEh1Change
OnKeyDown = DBComboBoxEh1KeyDown
OnKeyPress = DBComboBoxEh1KeyPress
end
end
object mbPanel4: TPanel
Left = 0
Top = 89
Width = 630
Height = 27
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object lblMemo: TLabel
Left = 202
Top = 8
Width = 36
Height = 12
Caption = #22791#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object lblName: TLabel
Left = 4
Top = 8
Width = 48
Height = 12
Caption = #20379#24212#21830#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object edtName: TfrComboEdit
Left = 52
Top = 3
Width = 145
Height = 21
Hint = #36755#20837#32534#30721#25110#21517#31216
Style = csSimple
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnKeyDown = edtNameKeyDown
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFF8888888888FFFFFF8888444888FFFFFF8888444888FFFFFF888888888
8FFFFFF8888447888FFFFFF8888447888FFFFFF8888844888FFFFFF888888447
8FFFFFF8744887447FFFFFF8447888444FFFFFF8447888444FFFFFF884488744
7FFFFFF8884444478FFFFFF8888888888FFFFFFFFFFFFFFFFFFF}
OnButtonClick = edtNameButtonClick
end
object edtMemo: TEdit
Left = 236
Top = 4
Width = 277
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object stinprice: TStaticText
Left = 514
Top = 1
Width = 150
Height = 24
AutoSize = False
BorderStyle = sbsSunken
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 2
end
object stQty: TStaticText
Left = 664
Top = 1
Width = 125
Height = 24
AutoSize = False
BorderStyle = sbsSunken
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 3
end
end
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 630
Height = 39
ButtonHeight = 35
ButtonWidth = 43
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = ILinfo
ParentFont = False
ParentShowHint = False
ShowCaptions = True
ShowHint = True
TabOrder = 1
object SpeedButton1: TSpeedButton
Left = 0
Top = 0
Width = 5
Height = 35
Flat = True
Visible = False
end
object cmdAdd: TToolButton
Left = 5
Top = 0
Hint = #26032#22686'(F2)'
AutoSize = True
Caption = #26032#22686
ImageIndex = 0
OnClick = cmdAddClick
end
object cmdEdit: TToolButton
Left = 40
Top = 0
Hint = #20462#25913'(F3)'
AutoSize = True
Caption = #20462#25913
Enabled = False
ImageIndex = 1
OnClick = cmdEditClick
end
object cmdSave: TToolButton
Left = 75
Top = 0
Hint = #20445#23384'(F4)'
AutoSize = True
Caption = #20445#23384
Enabled = False
ImageIndex = 2
OnClick = cmdSaveClick
end
object cmdUndo: TToolButton
Left = 110
Top = 0
Caption = #25764#28040
Enabled = False
ImageIndex = 3
OnClick = cmdUndoClick
end
object cmdDelLine: TToolButton
Left = 153
Top = 0
AutoSize = True
Caption = #21024#38500#34892
Enabled = False
ImageIndex = 4
OnClick = cmdDelLineClick
end
object ToolButton3: TToolButton
Left = 200
Top = 0
Width = 8
Caption = 'ToolButton3'
ImageIndex = 7
Style = tbsSeparator
end
object cmdDel: TToolButton
Left = 208
Top = 0
AutoSize = True
Caption = #21024#38500#21333
ImageIndex = 5
end
object ToolButton4: TToolButton
Left = 255
Top = 0
Width = 8
Caption = 'ToolButton4'
ImageIndex = 0
Style = tbsSeparator
end
object cmdPrior: TToolButton
Left = 263
Top = 0
AutoSize = True
Caption = #21069#21333
ImageIndex = 10
OnClick = cmdPriorClick
end
object cmdNext: TToolButton
Left = 298
Top = 0
AutoSize = True
Caption = #21518#21333
ImageIndex = 12
OnClick = cmdNextClick
end
object ToolButton8: TToolButton
Left = 333
Top = 0
Width = 8
Caption = 'ToolButton8'
ImageIndex = 7
Style = tbsSeparator
end
object cmdSearch: TToolButton
Left = 341
Top = 0
AutoSize = True
Caption = #26597#25214
ImageIndex = 6
OnClick = cmdSearchClick
end
object cmdPrint: TToolButton
Left = 376
Top = 0
Hint = #25171#21360#39044#35272'(Alt+P)'
AutoSize = True
Caption = #25171#21360
DropdownMenu = PopMprint
ImageIndex = 7
Style = tbsDropDown
end
object ToolButton7: TToolButton
Left = 424
Top = 0
Width = 8
Caption = 'ToolButton7'
ImageIndex = 1
Style = tbsSeparator
end
object cmdBill: TToolButton
Left = 432
Top = 0
AutoSize = True
Caption = #36873#21333
ImageIndex = 1
Visible = False
OnClick = cmdBillClick
end
object ToolButton2: TToolButton
Left = 467
Top = 0
Width = 8
Caption = 'ToolButton2'
ImageIndex = 10
Style = tbsSeparator
end
object cmdExit: TToolButton
Left = 475
Top = 0
Hint = #36864#20986'(Esc)'
AutoSize = True
Caption = #36864#20986
ImageIndex = 9
OnClick = cmdExitClick
end
end
object PopMprint: TPopupMenu
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -