📄 bomh.dfm
字号:
end
object Label8: TLabel
Left = 418
Top = 57
Width = 30
Height = 12
Caption = '备注:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 417
Top = 10
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 = 417
Top = 34
Width = 54
Height = 12
Caption = '失效日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 246
Top = 32
Width = 42
Height = 12
Caption = '成品率:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 246
Top = 11
Width = 30
Height = 12
Caption = '批量:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seBomhRlt: TSDEdit
Left = 300
Top = 45
Width = 77
Height = 18
Ctl3D = False
MaxLength = 12
ParentColor = True
ParentCtl3D = False
TabOrder = 4
Text = '0'
DigLen = 2
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object scBomhOp: TSDComboBox
Left = 300
Top = 66
Width = 93
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 = 5
Items.Strings = (
'1-无策略'
'2-订货点策略'
'3-订货上限策略'
'4-定期订货策略'
'5-定量订货策略'
'6-手工订货策略')
end
object scBomhPp: TSDComboBox
Left = 300
Top = 86
Width = 93
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 = 6
Items.Strings = (
'1-MRP'
'2-MPS'
'3-订货点'
'4-预测'
'5-成套件'
'6-自定义')
end
object scBomhProducter: TSDComboBox
Left = 300
Top = 106
Width = 93
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 = 7
Items.Strings = (
'1-制造件'
'2-采购件'
'3-外加工')
KeyItem = cbItem2
end
object memBomhDesc: TMemo
Left = 448
Top = 56
Width = 113
Height = 65
Color = clWhite
Ctl3D = False
ParentCtl3D = False
TabOrder = 10
end
object seBomhGoods: TSDEdit
Left = 67
Top = 4
Width = 163
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 = 0
Text = 'seBomhGoods'
OnExit = seBomhGoodsExit
OnKeyDown = seBomhGoodsKeyDown
OnButtonClick = seBomhGoodsButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
object deBomhIdate: TDateEdit
Left = 472
Top = 31
Width = 89
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2003-05-13'
InitDate = '2003-05-13 17:45:44'
ModalResult = 0
TabOrder = 9
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object deBomhEdate: TDateEdit
Left = 472
Top = 7
Width = 89
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2003-05-13'
InitDate = '2003-05-13 17:45:44'
ModalResult = 0
TabOrder = 8
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object Panel1: TPanel
Left = 4
Top = 25
Width = 232
Height = 104
BevelOuter = bvNone
Color = clWhite
TabOrder = 1
object Label34: TLabel
Left = 10
Top = 8
Width = 54
Height = 12
Caption = '父件名称:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 10
Top = 28
Width = 30
Height = 12
Caption = '版本:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 10
Top = 48
Width = 30
Height = 12
Caption = '规格:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 10
Top = 68
Width = 30
Height = 12
Caption = '类型:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 10
Top = 88
Width = 30
Height = 12
Caption = '单位:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seBomhGoodsName: TSDEdit
Left = 63
Top = 1
Width = 163
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 0
SplitSymbol = ' | '
end
object seBomhVer: TSDEdit
Left = 63
Top = 21
Width = 163
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 1
SplitSymbol = ' | '
end
object seBomhModel: TSDEdit
Left = 63
Top = 41
Width = 163
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 2
SplitSymbol = ' | '
end
object scBomhType: TSDComboBox
Left = 63
Top = 61
Width = 116
Height = 20
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 = 3
Text = 'scBomhType'
Items.Strings = (
'1-成品'
'2-半成品'
'3-材料'
'4-备用件'
'5-虚拟件'
'6-费用件')
end
object scBomhUnit: TSDComboBox
Left = 63
Top = 81
Width = 116
Height = 20
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 = 4
Text = 'scBomhUnit'
Items.Strings = (
'1-制造件'
'2-采购件'
'3-外加工')
KeyItem = cbItem2
end
end
object seBomhFpr: TSDEdit
Left = 300
Top = 25
Width = 77
Height = 18
Ctl3D = False
MaxLength = 6
ParentColor = True
ParentCtl3D = False
TabOrder = 3
Text = '0'
DigLen = 2
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seBomhEoq: TSDEdit
Left = 300
Top = 5
Width = 77
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 2
Text = 'seBomhEoq'
SplitSymbol = ' | '
end
end
end
inherited MainMenu1: TMainMenu
Left = 618
Top = 369
end
inherited ImageList1: TImageList
Left = 594
Top = 190
end
inherited BillPrintDlg: TPrintDialog
Left = 618
Top = 339
end
inherited BillPrnSetupDlg: TPrinterSetupDialog
Left = 658
Top = 184
end
inherited pmDetail: TPopupMenu
Left = 626
Top = 186
end
object ADOQuery1: TADOQuery
Parameters = <>
Left = 692
Top = 255
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -