squote.dfm
来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 1,273 行 · 第 1/3 页
DFM
1,273 行
inherited frmSquote: TfrmSquote
Left = 23
Top = 34
Width = 762
Height = 544
Caption = '销售报价'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
inherited sbBar: TStatusBar
Top = 476
Width = 754
end
inherited CoolBar1: TCoolBar
Width = 754
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 754
end>
inherited tbMainBar: TToolBar
Width = 741
inherited tbQuery: TToolButton
Visible = False
end
end
end
object FloatPanel3: TFloatPanel [2]
Left = 0
Top = 39
Width = 754
Height = 36
Align = alTop
Color = clWhite
Caption = 'FloatPanel3'
ParentColor = False
TabOrder = 2
object Label2: TLabel
Left = 18
Top = 9
Width = 54
Height = 12
Caption = '客户代码:'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 314
Top = 12
Width = 36
Height = 12
Caption = '币种:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object cbSquoteClientCode: TSDComboBox
Left = 97
Top = 5
Width = 188
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 0
OnClick = cbSquoteClientCodeClick
KeyItem = cbItem2
end
object scSquoteCurrency: TSDComboBox
Left = 383
Top = 4
Width = 130
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 1
OnClick = cbSquoteClientCodeClick
KeyItem = cbItem2
end
end
object FloatPanel1: TFloatPanel [3]
Left = 340
Top = 75
Width = 413
Height = 401
Color = clWhite
Caption = 'FloatPanel1'
ParentColor = False
TabOrder = 3
object Label3: TLabel
Left = 6
Top = 13
Width = 60
Height = 12
Caption = '货物代码:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 6
Top = 37
Width = 60
Height = 12
Caption = '计量单位:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 193
Top = 34
Width = 60
Height = 12
Caption = '价格类别:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 6
Top = 62
Width = 60
Height = 12
Caption = '生效日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 5
Top = 375
Width = 36
Height = 12
Caption = '备注:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 195
Top = 60
Width = 60
Height = 12
Caption = '失效日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label29: TLabel
Left = 5
Top = 350
Width = 48
Height = 12
Caption = '操作员:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label34: TLabel
Left = 205
Top = 350
Width = 60
Height = 12
Caption = '系统日期:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object lbSquoteSysDate: TLabel
Left = 287
Top = 350
Width = 90
Height = 12
Caption = 'lbSquoteSysDate'
end
object scSquoteUnit: TSDComboBox
Left = 74
Top = 30
Width = 104
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 1
KeyItem = cbItem2
end
object scSquoteSpt: TSDComboBox
Left = 263
Top = 29
Width = 126
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 2
KeyItem = cbItem2
end
object deSquoteSdate: TDateEdit
Left = 74
Top = 56
Width = 103
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2003-01-22'
InitDate = '2003-01-22'
ModalResult = 0
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
TabOrder = 3
Color = 50331647
Ctl3D = False
ParentFont = False
ParentCtl3D = False
end
object deSquoteEdate: TDateEdit
Left = 267
Top = 56
Width = 122
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2003-01-22'
InitDate = '2003-01-22'
ModalResult = 0
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
TabOrder = 4
Color = 50331647
Ctl3D = False
ParentFont = False
ParentCtl3D = False
end
object seSquoteDesc: TSDEdit
Left = 57
Top = 370
Width = 337
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 6
Text = 'seSquoteDesc'
SplitSymbol = ' | '
end
object seSquoteGoods: TSDEdit
Left = 74
Top = 8
Width = 155
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'seSquoteGoods'
OnButtonClick = seSquoteGoodsButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
object GroupBox1: TGroupBox
Left = 4
Top = 81
Width = 389
Height = 258
Caption = '报价明细'
TabOrder = 5
object Label11: TLabel
Left = 12
Top = 33
Width = 54
Height = 12
Caption = '数量段1:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 12
Top = 56
Width = 54
Height = 12
Caption = '数量段2:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 12
Top = 78
Width = 54
Height = 12
Caption = '数量段3:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 12
Top = 101
Width = 54
Height = 12
Caption = '数量段4:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 12
Top = 124
Width = 54
Height = 12
Caption = '数量段5:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 12
Top = 146
Width = 54
Height = 12
Caption = '数量段6:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?