📄 btht.dfm
字号:
inherited frmBtht: TfrmBtht
Left = 71
Top = 77
Width = 590
Height = 464
BorderIcons = [biSystemMenu, biMaximize]
Caption = '批号跟踪帐'
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 12
inherited sbBar: TStatusBar
Top = 396
Width = 582
end
inherited CoolBar1: TCoolBar
Width = 582
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 582
end>
inherited tbMainBar: TToolBar
Width = 569
end
end
object sgBtht: TSDGrid [2]
Left = 0
Top = 69
Width = 301
Height = 327
Align = alLeft
Color = clWhite
ColCount = 3
Ctl3D = False
DefaultRowHeight = 20
FixedColor = 8564917
FixedCols = 0
RowCount = 4
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
ParentCtl3D = False
TabOrder = 2
OnClick = sgBthtClick
EvenGridColor = clWhite
Columns = <
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>
ColWidths = (
109
91
90)
end
object fpBtht: TFloatPanel [3]
Left = 301
Top = 69
Width = 281
Height = 327
Align = alClient
Color = clWhite
Caption = 'fpBtht'
ParentColor = False
TabOrder = 3
object Label4: TLabel
Left = 7
Top = 14
Width = 54
Height = 12
Caption = '货位编码:'
Enabled = False
end
object Label5: TLabel
Left = 19
Top = 58
Width = 42
Height = 12
Caption = '年初数:'
end
object Label10: TLabel
Left = 19
Top = 80
Width = 42
Height = 12
Caption = '期初数:'
end
object Label12: TLabel
Left = 7
Top = 102
Width = 54
Height = 12
Caption = '本期收入:'
Enabled = False
end
object Label13: TLabel
Left = 7
Top = 124
Width = 54
Height = 12
Caption = '本期发出:'
Enabled = False
end
object Label14: TLabel
Left = 7
Top = 145
Width = 54
Height = 12
Caption = '本年收入:'
end
object Label15: TLabel
Left = 7
Top = 167
Width = 54
Height = 12
Caption = '本年发出:'
end
object Label16: TLabel
Left = 7
Top = 189
Width = 54
Height = 12
Caption = '本年累计:'
Enabled = False
end
object Label1: TLabel
Left = 7
Top = 36
Width = 54
Height = 12
Caption = '批号编码:'
end
object scBthtLoc: TSDComboBox
Left = 62
Top = 5
Width = 176
Height = 20
TabStop = False
Style = csDropDownList
Color = clWhite
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 0
KeyItem = cbItem2
end
object seBthtBoyQty: TSDEdit
Left = 62
Top = 52
Width = 117
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxLength = 13
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 1
Text = '0'
DigLen = 4
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seBthtBopQty: TSDEdit
Left = 62
Top = 74
Width = 117
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxLength = 13
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 2
Text = '0'
DigLen = 4
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seBthtOopQty: TSDEdit
Left = 62
Top = 117
Width = 117
Height = 18
TabStop = False
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 3
SplitSymbol = ' | '
end
object seBthtIopQty: TSDEdit
Left = 62
Top = 95
Width = 117
Height = 18
TabStop = False
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 4
SplitSymbol = ' | '
end
object seBthtIoyQty: TSDEdit
Left = 62
Top = 139
Width = 117
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxLength = 13
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 5
Text = '0'
DigLen = 4
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seBthtOoyQty: TSDEdit
Left = 62
Top = 160
Width = 117
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxLength = 13
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 6
Text = '0'
DigLen = 4
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seBthtAoyQty: TSDEdit
Left = 62
Top = 182
Width = 117
Height = 18
TabStop = False
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 7
SplitSymbol = ' | '
end
object cheBthtClose: TCheckBox
Left = 62
Top = 206
Width = 66
Height = 17
Caption = '已关闭'
TabOrder = 8
end
object cheBthtInit: TCheckBox
Left = 62
Top = 225
Width = 66
Height = 17
Caption = '已初始化'
TabOrder = 9
end
object scBthtBatch: TSDComboBox
Left = 62
Top = 27
Width = 176
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 10
KeyItem = cbItem2
end
end
object fpBtht1: TFloatPanel [4]
Left = 0
Top = 39
Width = 582
Height = 30
Align = alTop
Color = clWhite
Caption = 'fpBtht1'
ParentColor = False
TabOrder = 4
object Label9: TLabel
Left = 143
Top = 7
Width = 54
Height = 12
Caption = '物料编码:'
end
object Label3: TLabel
Left = 7
Top = 7
Width = 54
Height = 12
Caption = '财务月份:'
end
object LabCurFmonth: TLabel
Left = 61
Top = 7
Width = 72
Height = 12
Caption = 'LabCurFmonth'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object LabBthtGoods: TLabel
Left = 196
Top = 7
Width = 72
Height = 12
Caption = 'LabBthtGoods'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 315
Top = 7
Width = 54
Height = 12
Caption = '物料名称:'
end
object LabBthtGoodsName: TLabel
Left = 369
Top = 7
Width = 96
Height = 12
Caption = 'LabBthtGoodsName'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -