mrp_enter_informalmps_d.dfm

来自「一个MRPII系统源代码版本」· DFM 代码 · 共 172 行

inherited Frm_Mrp_Enter_InformalMps_D: TFrm_Mrp_Enter_InformalMps_D
  Left = 233
  Top = 142
  Caption = '非主生产计划'
  ClientHeight = 329
  ClientWidth = 436
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel [0]
    Left = 60
    Top = 25
    Width = 36
    Height = 12
    Caption = '月份：'
  end
  object Label2: TLabel [1]
    Left = 60
    Top = 56
    Width = 60
    Height = 12
    Caption = '物料代码：'
  end
  object Label3: TLabel [2]
    Left = 60
    Top = 88
    Width = 60
    Height = 12
    Caption = '需用日期：'
  end
  object Label4: TLabel [3]
    Left = 60
    Top = 116
    Width = 72
    Height = 12
    Caption = '生产订货量：'
  end
  object Label6: TLabel [4]
    Left = 60
    Top = 148
    Width = 36
    Height = 12
    Caption = '状态：'
  end
  object Label9: TLabel [5]
    Left = 60
    Top = 242
    Width = 36
    Height = 12
    Caption = '备注：'
  end
  object lbl_ItemName: TLabel [6]
    Left = 269
    Top = 58
    Width = 6
    Height = 12
  end
  object Label5: TLabel [7]
    Left = 60
    Top = 179
    Width = 60
    Height = 12
    Caption = '模具代码：'
  end
  object Label7: TLabel [8]
    Left = 60
    Top = 211
    Width = 66
    Height = 12
    Caption = '关键设备2：'
  end
  object lbl_MouldName: TLabel [9]
    Left = 270
    Top = 182
    Width = 6
    Height = 12
  end
  inherited btn_ok: TButton
    Left = 135
    Top = 281
    TabOrder = 8
  end
  inherited btn_Cancel: TButton
    Left = 271
    Top = 281
    Width = 73
    TabOrder = 9
  end
  inherited Pnl_Add: TPanel
    Left = 323
    TabOrder = 10
  end
  object edt_Mpsqty: TEdit [13]
    Left = 134
    Top = 111
    Width = 126
    Height = 20
    TabOrder = 3
    OnExit = edt_MpsqtyExit
  end
  object cmbx_Mpsstatus: TComboBox [14]
    Left = 134
    Top = 143
    Width = 129
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 4
  end
  object edt_MpsremArk: TEdit [15]
    Left = 134
    Top = 237
    Width = 242
    Height = 20
    MaxLength = 150
    TabOrder = 7
    OnExit = edt_MpsremArkExit
  end
  object Extedt_ItemCode: TExtEdit [16]
    Left = 134
    Top = 51
    Width = 126
    Height = 20
    TabOrder = 1
    OnExit = ItemCodeCheck
    OnKeyDown = ItemHint
    DispLabel = lbl_ItemName
  end
  object medt_MpsMonth: TMaskEdit [17]
    Left = 134
    Top = 20
    Width = 57
    Height = 20
    EditMask = '9999.99;1;_'
    MaxLength = 7
    TabOrder = 0
    Text = '    .  '
    OnExit = MonthCheck
  end
  object medt_Mpsdate: TMaskEdit [18]
    Left = 134
    Top = 83
    Width = 126
    Height = 20
    EditMask = '9999.99.00;1;_'
    MaxLength = 10
    TabOrder = 2
    Text = '    .  .  '
    OnExit = DateCheck
  end
  object Edt_Mpsequip2: TEdit [19]
    Left = 134
    Top = 206
    Width = 131
    Height = 20
    TabOrder = 6
    OnExit = Edt_Mpsequip2Exit
  end
  object edt_MouldCode: TExtEdit [20]
    Left = 135
    Top = 177
    Width = 126
    Height = 20
    TabOrder = 5
    OnExit = MouldCodeCheck
    OnKeyDown = MouldHint
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 342
    Top = 94
  end
end