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 + -
显示快捷键?