sreth.dfm
来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 1,413 行 · 第 1/3 页
DFM
1,413 行
inherited frmSreth: TfrmSreth
Left = 16
Top = 16
Width = 757
Height = 570
Caption = '销售退货'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object sgSretd: TSDGrid [0]
Left = 1
Top = 200
Width = 744
Height = 265
Color = clWhite
ColCount = 12
Ctl3D = False
DefaultRowHeight = 18
FixedColor = 8564917
FixedCols = 0
RowCount = 4
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
ParentCtl3D = False
ParentFont = False
PopupMenu = pmDetail
TabOrder = 3
OnClick = sgSretdClick
OnDblClick = sgSretdDblClick
OddGridColor = clWhite
Columns = <
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '行号'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '发货单号'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '发货行'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '物料编码'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '物料名称'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '规格'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '单位'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '换算系数'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '货位'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '数量'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '单价'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
ColHorAlign = haRight
TitleString = '金额'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
ColHorAlign = haRight
TitleString = '税额'
ColumnWidth = 0
end>
ColWidths = (
6
26
77
46
95
91
54
60
62
62
82
70)
end
object FloatPanel2: TFloatPanel [1]
Left = 0
Top = 200
Width = 749
Height = 269
Align = alClient
Color = clWhite
Caption = 'FloatPanel2'
ParentColor = False
TabOrder = 4
object GroupBox2: TGroupBox
Left = 5
Top = 2
Width = 352
Height = 256
Color = clWhite
ParentColor = False
TabOrder = 0
object Label24: TLabel
Left = 9
Top = 137
Width = 54
Height = 12
Caption = '计量单位:'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label25: TLabel
Left = 179
Top = 135
Width = 54
Height = 12
Caption = '换算系数:'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label30: TLabel
Left = 9
Top = 13
Width = 42
Height = 12
Caption = '单行号:'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label31: TLabel
Left = 9
Top = 87
Width = 54
Height = 12
Caption = '物料编码:'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label26: TLabel
Left = 9
Top = 63
Width = 54
Height = 12
Caption = '发货行号:'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label19: TLabel
Left = 9
Top = 38
Width = 54
Height = 12
Caption = '发货单号:'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label23: TLabel
Left = 9
Top = 186
Width = 54
Height = 12
Caption = '退货数量:'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label16: TLabel
Left = 9
Top = 112
Width = 54
Height = 12
Caption = '货物名称:'
end
object Label20: TLabel
Left = 9
Top = 211
Width = 30
Height = 12
Caption = '单价:'
end
object Label21: TLabel
Left = 9
Top = 236
Width = 30
Height = 12
Caption = '金额:'
Enabled = False
end
object Label27: TLabel
Left = 188
Top = 235
Width = 30
Height = 12
Caption = '税额:'
Enabled = False
end
object Label28: TLabel
Left = 9
Top = 162
Width = 54
Height = 12
Caption = '退货货位:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seSretdConv: TSDEdit
Left = 240
Top = 133
Width = 89
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 6
Text = '0'
DigLen = 4
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seSretdLine: TSDEdit
Left = 64
Top = 10
Width = 132
Height = 18
Ctl3D = False
Enabled = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = '0'
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seSretdGoodsName: TSDEdit
Left = 64
Top = 108
Width = 167
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 4
Text = 'seSretdGoodsName'
SplitSymbol = ' | '
end
object seSretdQty: TSDEdit
Left = 64
Top = 182
Width = 106
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 8
Text = '0'
OnExit = seSretdQtyExit
DigLen = 4
DataType = dtNumber
CharType = ctMathematic
OnButtonClick = seSretdQtyButtonClick
ButtonVisible = True
SplitSymbol = ' | '
DefaultValue = '0'
end
object seSretdGoods: TSDEdit
Left = 64
Top = 84
Width = 163
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 3
Text = 'seSretdGoods'
OnExit = seSretdGoodsExit
OnButtonClick = seSretdGoodsButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
object seSretdSogCode: TSDEdit
Left = 64
Top = 35
Width = 160
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 1
Text = 'seSretdSogCode'
OnButtonClick = seSretdSogCodeButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
object seSretdSogdLine: TSDEdit
Left = 64
Top = 59
Width = 101
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 2
Text = '0'
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seSretdUnit: TSDEdit
Left = 64
Top = 133
Width = 105
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 5
Text = 'seSretdUnit'
OnKeyDown = seSretdUnitKeyDown
OnButtonClick = seSretdUnitButtonClick
ButtonVisible = True
KeyItem = cbItem2
SplitSymbol = ' | '
end
object seSretdPrice: TSDEdit
Left = 64
Top = 206
Width = 107
Height = 18
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?