inv_batchhint_add.dfm

一个MRPII系统源代码版本

inherited Frm_Inv_BatchHint_Add: TFrm_Inv_BatchHint_Add
  Left = 137
  Top = 105
  ActiveControl = CmBx_BackFlush
  Caption = '批次增加'
  ClientHeight = 298
  ClientWidth = 445
  PixelsPerInch = 96
  TextHeight = 12
  object Label3: TLabel [0]
    Left = 62
    Top = 119
    Width = 60
    Height = 12
    Caption = '批次描述：'
  end
  object Label4: TLabel [1]
    Left = 14
    Top = 67
    Width = 108
    Height = 12
    Caption = '是否允许拉式领料：'
  end
  object Label5: TLabel [2]
    Left = 74
    Top = 93
    Width = 48
    Height = 12
    Caption = '供应商：'
  end
  object Label6: TLabel [3]
    Left = 38
    Top = 146
    Width = 84
    Height = 12
    Caption = '供应商批次号：'
  end
  object Label10: TLabel [4]
    Left = 38
    Top = 172
    Width = 84
    Height = 12
    Caption = '是否控制有效：'
  end
  object Label12: TLabel [5]
    Left = 86
    Top = 41
    Width = 36
    Height = 12
    Caption = '物料：'
  end
  object Label7: TLabel [6]
    Left = 74
    Top = 198
    Width = 48
    Height = 12
    Caption = '有效期：'
  end
  object Label8: TLabel [7]
    Left = 86
    Top = 224
    Width = 36
    Height = 12
    Caption = '备注：'
  end
  object Lbl_Vendor: TLabel [8]
    Left = 132
    Top = 93
    Width = 60
    Height = 12
    Caption = 'Lbl_Vendor'
  end
  object Lbl_Item: TLabel [9]
    Left = 132
    Top = 41
    Width = 48
    Height = 12
    Caption = 'Lbl_Item'
  end
  inherited btn_ok: TButton
    Left = 236
    Top = 252
  end
  inherited btn_Cancel: TButton
    Left = 345
    Top = 252
  end
  object Edt_VendorBatchNo: TEdit [12]
    Left = 132
    Top = 142
    Width = 79
    Height = 20
    TabOrder = 4
    Text = 'Edt_VendorBatchNo'
  end
  object Edt_UsefulDate: TEdit [13]
    Left = 132
    Top = 193
    Width = 79
    Height = 20
    TabOrder = 6
    Text = 'Edt_UsefulDate'
    OnExit = Edt_UsefulDateExit
  end
  object Edt_BatchName: TEdit [14]
    Left = 132
    Top = 114
    Width = 293
    Height = 20
    TabOrder = 3
    Text = 'Edt_BatchName'
    OnExit = TextCheck
  end
  object Edt_RemArk: TEdit [15]
    Left = 132
    Top = 219
    Width = 293
    Height = 20
    TabOrder = 7
    Text = 'Edt_RemArk'
  end
  object CmBx_UsefulCtrl: TComboBox [16]
    Left = 132
    Top = 168
    Width = 80
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 5
    OnChange = CmBx_UsefulCtrlChange
    Items.Strings = (
      '否'
      '是')
  end
  object CmBx_BackFlush: TComboBox [17]
    Left = 132
    Top = 61
    Width = 80
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 2
    Items.Strings = (
      '否'
      '是')
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 368
  end
end