mrp_param.dfm
来自「一个MRPII系统源代码版本」· DFM 代码 · 共 291 行
DFM
291 行
inherited Frm_Mrp_Param: TFrm_Mrp_Param
Left = 327
Top = 123
BorderIcons = [biSystemMenu]
Caption = #31995#32479#21442#25968#35774#32622
ClientHeight = 396
ClientWidth = 521
Visible = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
object Label2: TLabel [0]
Left = 129
Top = 9
Width = 168
Height = 12
Caption = #20027#35745#21010#34892#23436#25104#21518#26159#21542#33258#21160#20851#38381#65306
end
object Label9: TLabel [1]
Left = 117
Top = 36
Width = 180
Height = 12
Caption = #38144#21806#20986#24211#26102#26159#21542#33258#21160#26680#38144#20027#35745#21010#65306
end
object Label1: TLabel [2]
Left = 9
Top = 62
Width = 288
Height = 12
Caption = #38144#21806#20986#24211#25163#24037#26680#38144#20027#35745#21010#26102#65292#26159#21542#20801#35768#36229#29983#20135#35746#36135#37327#65306
end
object Label11: TLabel [3]
Left = 129
Top = 87
Width = 168
Height = 12
Caption = #29983#20135#24314#35758#26174#31034#25552#21069#22825#25968'(1-99)'#65306
end
object Label3: TLabel [4]
Left = 159
Top = 173
Width = 138
Height = 12
Caption = #27599#22825#33258#21160#36816#34892'Mrp'#30340#26102#38388#65306
end
object Label4: TLabel [5]
Left = 219
Top = 327
Width = 78
Height = 12
Caption = #20309#22788#36816#34892'Mrp'#65306
end
object Label7: TLabel [6]
Left = 195
Top = 149
Width = 102
Height = 12
Caption = #26159#21542#23450#26102#36816#34892'Mrp'#65306
end
object Label10: TLabel [7]
Left = 27
Top = 245
Width = 270
Height = 12
Caption = #27599#22825#23450#26102#22312#26381#21153#22120#31471#36816#34892#32508#21512#26085#25253#34920#31243#24207#30340#26102#38388'1'#65306
end
object Label12: TLabel [8]
Left = 27
Top = 269
Width = 270
Height = 12
Caption = #27599#22825#23450#26102#22312#26381#21153#22120#31471#36816#34892#32508#21512#26085#25253#34920#31243#24207#30340#26102#38388'2'#65306
end
object Label13: TLabel [9]
Left = 27
Top = 293
Width = 270
Height = 12
Caption = #27599#22825#23450#26102#22312#26381#21153#22120#31471#36816#34892#32508#21512#26085#25253#34920#31243#24207#30340#26102#38388'3'#65306
end
object Label14: TLabel [10]
Left = 51
Top = 113
Width = 246
Height = 12
Caption = #25509#29983#20135'/'#37319#36141#24314#35758#26159#21542#21487#20197#36229#20986#31995#32479#24314#35758#20313#37327#65306
end
object Label15: TLabel [11]
Left = 183
Top = 197
Width = 114
Height = 12
Caption = 'Mrp'#23637#24320#25968#25454#39537#21160#28304#65306
end
object Bevel1: TBevel [12]
Left = 0
Top = 224
Width = 505
Height = 9
Shape = bsTopLine
Style = bsRaised
end
inherited btn_ok: TButton
Left = 195
Top = 358
TabOrder = 12
end
inherited btn_Cancel: TButton
Left = 340
Top = 358
TabOrder = 13
OnClick = btn_CancelClick
end
object Cmbx_autoCloseMps: TComboBox [15]
Left = 296
Top = 5
Width = 74
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 0
OnChange = Edt_BuyerCtrlTypeChange
Items.Strings = (
#21542
#26159)
end
object cmbx_autoBalanceMps: TComboBox [16]
Left = 296
Top = 32
Width = 74
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 1
OnChange = Edt_BuyerCtrlTypeChange
Items.Strings = (
#21542
#26159)
end
object Cmbx_CanOverPlan: TComboBox [17]
Left = 296
Top = 58
Width = 74
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 2
OnChange = Edt_BuyerCtrlTypeChange
Items.Strings = (
#21542
#26159)
end
object Edt_SSDay: TEdit [18]
Left = 296
Top = 83
Width = 101
Height = 20
TabOrder = 3
OnChange = Edt_BuyerCtrlTypeChange
OnExit = Edt_SSDayExit
end
object Cmbx_WhereRunMrp: TComboBox [19]
Left = 295
Top = 323
Width = 144
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 11
OnChange = Edt_BuyerCtrlTypeChange
Items.Strings = (
'0 '#23458#25143#31471#36816#34892
'1 '#26381#21153#31471#36816#34892)
end
object EDt_AutoRunMrp: TMaskEdit [20]
Left = 295
Top = 169
Width = 101
Height = 20
EditMask = '!99:99;1;_'
MaxLength = 5
TabOrder = 6
Text = ' : '
OnChange = Edt_BuyerCtrlTypeChange
OnExit = EDt_AutoRunMrpExit
end
object Cmb_AutoRunMrp: TComboBox [21]
Left = 295
Top = 145
Width = 101
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 5
OnChange = Edt_BuyerCtrlTypeChange
Items.Strings = (
'0 '#19981#36816#34892
'1 '#36816#34892)
end
object MEdt_AutoRunPSI1: TMaskEdit [22]
Left = 295
Top = 241
Width = 101
Height = 20
EditMask = '!99:99;1;_'
MaxLength = 5
TabOrder = 8
Text = ' : '
OnChange = MEdt_AutoRunPSI1Change
OnExit = MEdt_AutoRunPSI1Exit
end
object MEdt_AutoRunPSI2: TMaskEdit [23]
Left = 295
Top = 265
Width = 101
Height = 20
EditMask = '!99:99;1;_'
MaxLength = 5
TabOrder = 9
Text = ' : '
OnChange = MEdt_AutoRunPSI1Change
OnExit = MEdt_AutoRunPSI2Exit
end
object MEdt_AutoRunPSI3: TMaskEdit [24]
Left = 295
Top = 289
Width = 101
Height = 20
EditMask = '!99:99;1;_'
MaxLength = 5
TabOrder = 10
Text = ' : '
OnChange = MEdt_AutoRunPSI1Change
OnExit = MEdt_AutoRunPSI3Exit
end
object Panel3: TPanel [25]
Left = -1
Top = 316
Width = 506
Height = 3
TabOrder = 14
object Panel1: TPanel
Left = 0
Top = -3
Width = 462
Height = 2
TabOrder = 0
end
end
object Panel2: TPanel [26]
Left = 0
Top = 136
Width = 502
Height = 3
TabOrder = 15
end
object Cmb_ReceiveOrder: TComboBox [27]
Left = 296
Top = 109
Width = 101
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 4
OnChange = Edt_BuyerCtrlTypeChange
Items.Strings = (
'0 '#19981#21487#20197
'1 '#21487#20197' ')
end
object cmb_Mrpds: TComboBox [28]
Left = 295
Top = 194
Width = 170
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 7
OnChange = Edt_BuyerCtrlTypeChange
Items.Strings = (
'1 '#38144#21806#35746#21333
'2 '#20027#29983#20135#35745#21010
'3 '#38144#21806#35746#21333'+'#20027#29983#20135#35745#21010
'4 '#38144#21806#35746#21333'+'#20027#29983#20135#35745#21010#32452#21512#39537#21160)
end
inherited AdoQry_Tmp: TAdoQuery
Left = 644
Top = 8
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?