📄 pbomh.dfm
字号:
ParentCtl3D = False
TabOrder = 3
Text = '0'
DigLen = 2
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object scPbomhOp: TSDComboBox
Left = 301
Top = 63
Width = 133
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 scPbomhPp: TSDComboBox
Left = 301
Top = 83
Width = 133
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 scPbomhProducter: TSDComboBox
Left = 301
Top = 103
Width = 133
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 memPbomhDesc: TMemo
Left = 495
Top = 54
Width = 149
Height = 39
Color = clWhite
Ctl3D = False
ParentCtl3D = False
TabOrder = 10
end
object dePbomhIdate: TDateEdit
Left = 506
Top = 29
Width = 90
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-05-11'
InitDate = '2001-05-11'
ModalResult = 0
TabOrder = 9
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object dePbomhEdate: TDateEdit
Left = 506
Top = 6
Width = 90
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-05-11'
InitDate = '2001-05-11'
ModalResult = 0
TabOrder = 8
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object sePbomhGoods: TSDEdit
Left = 65
Top = 4
Width = 168
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'sePbomhGoods'
OnExit = sePbomhGoodsExit
OnKeyDown = sePbomhGoodsKeyDown
OnButtonClick = sePbomhGoodsButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
object Panel2: TPanel
Left = 3
Top = 26
Width = 234
Height = 100
BevelOuter = bvNone
Color = clWhite
TabOrder = 1
object Label34: TLabel
Left = 7
Top = 6
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 = 7
Top = 26
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 = 7
Top = 45
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 = 7
Top = 65
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 = 7
Top = 84
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 scPbomhUnit: TSDComboBox
Left = 62
Top = 77
Width = 120
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 = 'scPbomhUnit'
Items.Strings = (
'1-制造件'
'2-采购件'
'3-外加工')
KeyItem = cbItem2
end
object scPbomhType: TSDComboBox
Left = 62
Top = 58
Width = 120
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 = 'scPbomhType'
Items.Strings = (
'1-成品'
'2-半成品'
'3-材料'
'4-备用件'
'5-虚拟件'
'6-费用件')
end
object sePbomhModel: TSDEdit
Left = 62
Top = 38
Width = 168
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 sePbomhVer: TSDEdit
Left = 62
Top = 19
Width = 168
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 sePbomhGoodsName: TSDEdit
Left = 62
Top = -1
Width = 168
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
end
object sePbomhFpr: TSDEdit
Left = 301
Top = 43
Width = 115
Height = 18
Ctl3D = False
MaxLength = 6
ParentColor = True
ParentCtl3D = False
TabOrder = 4
Text = '0'
DigLen = 2
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
end
inherited sbBar: TStatusBar
Top = 457
Width = 657
Height = 20
end
inherited CoolBar1: TCoolBar
Width = 657
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 657
end>
inherited tbMainBar: TToolBar
Width = 644
end
end
object FloatPanel3: TFloatPanel [5]
Left = 0
Top = 430
Width = 657
Height = 27
Align = alBottom
Color = clWhite
Caption = 'FloatPanel3'
ParentColor = False
TabOrder = 5
object Label36: TLabel
Left = 518
Top = 6
Width = 42
Height = 12
Caption = '制单人:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object labPbomhUser: TLabel
Left = 560
Top = 6
Width = 48
Height = 12
Caption = 'UserCode'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 323
Top = 6
Width = 54
Height = 12
Caption = '制单日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object labSysDate: TLabel
Left = 377
Top = 6
Width = 42
Height = 12
Caption = 'SysDate'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
end
inherited MainMenu1: TMainMenu
Left = 549
Top = 261
end
inherited ImageList1: TImageList
Left = 579
Top = 290
end
inherited BillPrintDlg: TPrintDialog
Left = 549
Top = 290
end
inherited BillPrnSetupDlg: TPrinterSetupDialog
Left = 579
Top = 261
end
inherited pmDetail: TPopupMenu
Left = 550
Top = 326
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -