mrp_enter_mo_d.dfm

一个MRPII系统源代码版本

inherited Frm_Mrp_Enter_Mo_D: TFrm_Mrp_Enter_Mo_D
  Left = 239
  Top = 187
  Caption = '生产订单'
  ClientHeight = 218
  ClientWidth = 380
  PixelsPerInch = 96
  TextHeight = 12
  object Label4: TLabel [0]
    Left = 28
    Top = 64
    Width = 72
    Height = 12
    Caption = '约定交货量：'
  end
  object Label3: TLabel [1]
    Left = 28
    Top = 87
    Width = 72
    Height = 12
    Caption = '约定交货日：'
  end
  object Label2: TLabel [2]
    Left = 40
    Top = 18
    Width = 60
    Height = 12
    Caption = '物料代码：'
  end
  object Label1: TLabel [3]
    Left = 28
    Top = 109
    Width = 72
    Height = 12
    Caption = '约定开工日：'
  end
  object Label5: TLabel [4]
    Left = 40
    Top = 41
    Width = 60
    Height = 12
    Caption = '物料描述：'
  end
  object Label6: TLabel [5]
    Left = 16
    Top = 132
    Width = 84
    Height = 12
    Caption = '是否拉式领料：'
  end
  object Label7: TLabel [6]
    Left = 64
    Top = 155
    Width = 36
    Height = 12
    Caption = '备注：'
  end
  inherited btn_ok: TButton
    Left = 124
    Top = 182
    TabOrder = 7
  end
  inherited btn_Cancel: TButton
    Left = 225
    Top = 182
    TabOrder = 8
  end
  inherited Pnl_Add: TPanel
    Left = 267
    Top = 5
    Width = 48
    Height = 21
    TabOrder = 9
  end
  object Edt_Qty: TEdit [10]
    Left = 101
    Top = 60
    Width = 107
    Height = 20
    TabOrder = 2
    OnExit = FloatCheck
  end
  object medt_Modate: TMaskEdit [11]
    Left = 101
    Top = 83
    Width = 106
    Height = 20
    AutoSelect = False
    EditMask = '!9999.99.99;1;'
    MaxLength = 10
    TabOrder = 3
    Text = '    .  .  '
    OnExit = medt_ModateExit
  end
  object MEdt_MoStArtWorkDate: TMaskEdit [12]
    Left = 101
    Top = 106
    Width = 106
    Height = 20
    AutoSelect = False
    EditMask = '!9999.99.99;1;'
    MaxLength = 10
    TabOrder = 4
    Text = '    .  .  '
    OnExit = DateCheck
  end
  object cmbBackflush: TComboBox [13]
    Left = 101
    Top = 129
    Width = 108
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 5
    Items.Strings = (
      '0 否'
      '1 是')
  end
  object Extedt_ItemCode: TLinkEdit [14]
    Left = 101
    Top = 14
    Width = 125
    Height = 20
    LinkStyle = lsEllipsis
    TabOrder = 0
    OnButtonClick = Extedt_ItemCodeButtonClick
    OnExit = ExtEdt_ItemCodeExit
    OnKeyDown = ExtEdt_ItemCodeKeyDown
  end
  object edt_ItemName: TEdit [15]
    Left = 101
    Top = 37
    Width = 250
    Height = 20
    Enabled = False
    TabOrder = 1
  end
  object edt_remArk: TEdit [16]
    Left = 101
    Top = 152
    Width = 228
    Height = 20
    Enabled = False
    MaxLength = 30
    TabOrder = 6
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 246
    Top = 80
  end
end