qc_checkresult3_c.dfm

一个MRPII系统源代码版本

inherited Frm_Qc_CheckResult3_C: TFrm_Qc_CheckResult3_C
  Left = 317
  Top = 184
  ClientHeight = 231
  ClientWidth = 391
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel [0]
    Left = 32
    Top = 46
    Width = 60
    Height = 12
    Caption = '部门代码：'
  end
  object Label2: TLabel [1]
    Left = 32
    Top = 70
    Width = 60
    Height = 12
    Caption = '部门名称：'
  end
  object Label3: TLabel [2]
    Left = 20
    Top = 138
    Width = 72
    Height = 12
    Caption = '到货日期从：'
  end
  object Label4: TLabel [3]
    Left = 32
    Top = 160
    Width = 60
    Height = 12
    Caption = '质量状态：'
  end
  object Lbl_VendorName: TLabel [4]
    Left = 92
    Top = 68
    Width = 6
    Height = 12
  end
  object Label6: TLabel [5]
    Left = 163
    Top = 139
    Width = 24
    Height = 12
    Caption = '开始'
  end
  object Label5: TLabel [6]
    Left = 32
    Top = 93
    Width = 60
    Height = 12
    Caption = '物料代码：'
  end
  object Label7: TLabel [7]
    Left = 32
    Top = 117
    Width = 60
    Height = 12
    Caption = '物料描述：'
  end
  object lbl_ItemName: TLabel [8]
    Left = 92
    Top = 116
    Width = 6
    Height = 12
  end
  object Label8: TLabel [9]
    Left = 32
    Top = 23
    Width = 60
    Height = 12
    Caption = '缺省仓库：'
  end
  inherited btn_ok: TButton
    Left = 112
    Top = 191
    TabOrder = 5
  end
  inherited btn_Cancel: TButton
    Left = 207
    Top = 191
    TabOrder = 6
  end
  object ExtEdt_VendorCode: TExtEdit [12]
    Left = 92
    Top = 41
    Width = 105
    Height = 20
    TabOrder = 1
    OnExit = ExtEdt_VendorCodeExit
    OnKeyDown = DeptHint
    DispLabel = Lbl_VendorName
  end
  object Medt_CheckDate: TMaskEdit [13]
    Left = 92
    Top = 133
    Width = 69
    Height = 20
    EditMask = '0000\.00\.00;1;_'
    MaxLength = 10
    TabOrder = 3
    Text = '    .  .  '
    OnExit = Medt_CheckDateExit
  end
  object Cmbx_QcStatus: TComboBox [14]
    Left = 92
    Top = 156
    Width = 105
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 4
    Items.Strings = (
      '0 未处理'
      '1 正常'
      '3 让步'
      '4 挑选'
      '5 试用'
      '6 特采')
  end
  object edt_ItemCode: TExtEdit [15]
    Left = 92
    Top = 87
    Width = 105
    Height = 20
    TabOrder = 2
    OnExit = GetItemName
    OnKeyDown = ItemHint
    DispLabel = lbl_ItemName
  end
  object cmbx_WhCode: TComboBox [16]
    Left = 92
    Top = 18
    Width = 105
    Height = 20
    ItemHeight = 12
    TabOrder = 0
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 336
    Top = 8
  end
end