📄 rmbh.dfm
字号:
object seRmbdLoc: TSDEdit
Left = 348
Top = 45
Width = 145
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 5
Text = 'seRmbdLoc'
OnButtonClick = seRmbdLocButtonClick
ButtonVisible = True
KeyItem = cbItem2
DispItem = cbItem1
SplitSymbol = ' | '
end
end
object sgRmbh: TSDGrid [1]
Left = 0
Top = 139
Width = 661
Height = 283
Anchors = [akLeft, akTop, akRight, akBottom]
Color = clWhite
ColCount = 7
Ctl3D = False
DefaultRowHeight = 20
FixedColor = 8564917
FixedCols = 0
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
ParentCtl3D = False
ParentFont = False
TabOrder = 5
OnDblClick = sgRmbhDblClick
OnSelectCell = sgRmbhSelectCell
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
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>
ColWidths = (
34
139
65
66
115
120
93)
end
inherited sbBar: TStatusBar
Top = 453
Width = 661
end
inherited CoolBar1: TCoolBar
Width = 661
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 661
end>
inherited tbMainBar: TToolBar
Width = 648
end
end
object fpRmbh: TFloatPanel [4]
Left = 0
Top = 39
Width = 661
Height = 100
Align = alTop
Color = clWhite
ParentColor = False
TabOrder = 2
object Label1: TLabel
Left = 20
Top = 14
Width = 54
Height = 12
Caption = '退料单号:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 20
Top = 38
Width = 54
Height = 12
Caption = '制单日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 20
Top = 61
Width = 54
Height = 12
Caption = '财务月份:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 290
Top = 58
Width = 42
Height = 12
Caption = '单备注:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 290
Top = 13
Width = 54
Height = 12
Caption = '收发类型:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label26: TLabel
Left = 290
Top = 35
Width = 54
Height = 12
Caption = '加工单号:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seRmbhCode: TSDEdit
Left = 78
Top = 9
Width = 147
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'seRmbhCode'
OnKeyDown = seRmbhCodeKeyDown
SplitSymbol = ' | '
end
object deRmbhDate: TDateEdit
Left = 78
Top = 34
Width = 94
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-05-11'
InitDate = '2001-05-11'
ModalResult = 0
TabOrder = 1
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object scRmbhFmonth: TSDComboBox
Left = 78
Top = 53
Width = 94
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 2
end
object memRmbhDesc: TMemo
Left = 345
Top = 52
Width = 178
Height = 33
Color = clWhite
Ctl3D = False
Lines.Strings = (
'')
ParentCtl3D = False
TabOrder = 5
end
object scRmbhPosType: TSDComboBox
Left = 345
Top = 5
Width = 130
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 3
KeyItem = cbItem2
end
object seRmbhWo: TSDEdit
Left = 345
Top = 28
Width = 178
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 4
Text = 'seRmbhWo'
OnButtonClick = seRmbhWoButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
end
object fpBottom: TFloatPanel [5]
Left = 0
Top = 422
Width = 661
Height = 31
Align = alBottom
Color = clWhite
Enabled = False
ParentColor = False
TabOrder = 4
object Label3: TLabel
Left = 414
Top = 7
Width = 42
Height = 12
Caption = '审核人:'
end
object labChecker: TLabel
Left = 460
Top = 7
Width = 42
Height = 12
Caption = 'Checker'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 533
Top = 7
Width = 42
Height = 12
Caption = '制单人:'
end
object labUser: TLabel
Left = 582
Top = 7
Width = 42
Height = 12
Caption = 'labUser'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 296
Top = 7
Width = 54
Height = 12
Caption = '审核日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object labCheckDate: TLabel
Left = 353
Top = 7
Width = 54
Height = 12
Caption = 'CheckDate'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object chkRmbhCheck: TCheckBox
Left = 211
Top = 5
Width = 69
Height = 17
Caption = '已审核'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
end
end
inherited MainMenu1: TMainMenu
Left = 413
Top = 369
end
inherited ImageList1: TImageList
Left = 355
Top = 369
end
inherited BillPrintDlg: TPrintDialog
Left = 470
Top = 369
end
inherited BillPrnSetupDlg: TPrinterSetupDialog
Left = 441
Top = 369
end
inherited pmDetail: TPopupMenu
Left = 384
Top = 369
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -