pm_pc_entry_d.dfm

一个MRPII系统源代码版本

inherited Frm_Pm_Pc_Entry_D: TFrm_Pm_Pc_Entry_D
  Left = 263
  Top = 178
  Caption = '采购价格表'
  ClientHeight = 298
  ClientWidth = 465
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel [0]
    Left = 32
    Top = 49
    Width = 60
    Height = 12
    Caption = '物料代码：'
  end
  object Label3: TLabel [1]
    Left = 32
    Top = 122
    Width = 60
    Height = 12
    Caption = '起始日期：'
  end
  object Label4: TLabel [2]
    Left = 32
    Top = 146
    Width = 60
    Height = 12
    Caption = '终止日期：'
  end
  object Label5: TLabel [3]
    Left = 32
    Top = 171
    Width = 60
    Height = 12
    Caption = '起始数量：'
  end
  object Label6: TLabel [4]
    Left = 32
    Top = 195
    Width = 60
    Height = 12
    Caption = '终止数量：'
  end
  object Label7: TLabel [5]
    Left = 229
    Top = 122
    Width = 72
    Height = 12
    Caption = '暂估含税价：'
  end
  object Label8: TLabel [6]
    Left = 229
    Top = 146
    Width = 72
    Height = 12
    Caption = '暂估未税价：'
  end
  object Label9: TLabel [7]
    Left = 32
    Top = 219
    Width = 60
    Height = 12
    Caption = '业务类型：'
  end
  object Lbl_ItemName: TLabel [8]
    Left = 392
    Top = 35
    Width = 72
    Height = 12
    Caption = 'Lbl_ItemName'
    Visible = False
  end
  object Label11: TLabel [9]
    Left = 32
    Top = 98
    Width = 60
    Height = 12
    Caption = '计量单位：'
  end
  object Label12: TLabel [10]
    Left = 32
    Top = 25
    Width = 60
    Height = 12
    Caption = '批准状态：'
  end
  object Label2: TLabel [11]
    Left = 32
    Top = 73
    Width = 60
    Height = 12
    Caption = '物料描述：'
  end
  object Label13: TLabel [12]
    Left = 229
    Top = 170
    Width = 72
    Height = 12
    Caption = '正式含税价：'
  end
  object Label14: TLabel [13]
    Left = 229
    Top = 194
    Width = 72
    Height = 12
    Caption = '正式未税价：'
  end
  inherited btn_ok: TButton
    Left = 231
    Top = 256
    TabOrder = 13
  end
  inherited btn_Cancel: TButton
    Left = 340
    Top = 256
    TabOrder = 14
  end
  inherited Pnl_Add: TPanel
    TabOrder = 15
  end
  object MEdt_PcStArtDate: TMaskEdit [17]
    Left = 96
    Top = 118
    Width = 73
    Height = 20
    EditMask = '0000\.00\.00;1;_'
    MaxLength = 10
    TabOrder = 4
    Text = '    .  .  '
    OnExit = DateCheck
  end
  object MEdt_PcendDate: TMaskEdit [18]
    Left = 96
    Top = 142
    Width = 73
    Height = 20
    EditMask = '0000\.00\.00;1;_'
    MaxLength = 10
    TabOrder = 5
    Text = '    .  .  '
    OnExit = MEdt_PcendDateExit
  end
  object Edt_PcStArtQty: TEdit [19]
    Left = 96
    Top = 167
    Width = 97
    Height = 20
    TabOrder = 6
    OnExit = Edt_PcStArtQtyExit
  end
  object Edt_PcendQty: TEdit [20]
    Left = 96
    Top = 191
    Width = 97
    Height = 20
    TabOrder = 7
    OnExit = Edt_PcendQtyExit
  end
  object Edt_PcTaxPrice: TEdit [21]
    Left = 304
    Top = 118
    Width = 94
    Height = 20
    TabOrder = 8
    OnExit = Edt_PcTaxPriceExit
  end
  object Edt_PcNoTaxPrice: TEdit [22]
    Left = 304
    Top = 142
    Width = 94
    Height = 20
    TabOrder = 9
    OnExit = Edt_PcNoTaxPriceExit
  end
  object CmBx_PcPriceType: TComboBox [23]
    Left = 96
    Top = 215
    Width = 98
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 12
    Items.Strings = (
      '采购'
      '委外')
  end
  object ExtEdt_ItemCode: TLinkEdit [24]
    Left = 96
    Top = 45
    Width = 123
    Height = 20
    LinkStyle = lsEllipsis
    TabOrder = 1
    OnButtonClick = ExtEdt_ItemCodeButtonClick
    OnExit = ItemCodeCheck
    OnKeyDown = ItemHint
  end
  object Edt_ItemName: TEdit [25]
    Left = 96
    Top = 69
    Width = 250
    Height = 20
    Enabled = False
    TabOrder = 2
  end
  object Lbl_UomName: TEdit [26]
    Left = 96
    Top = 94
    Width = 49
    Height = 20
    Enabled = False
    TabOrder = 3
  end
  object Lbl_PcLineStatus: TEdit [27]
    Left = 96
    Top = 21
    Width = 121
    Height = 20
    Enabled = False
    TabOrder = 0
  end
  object Edt_PcTaxPrice_Formal: TEdit [28]
    Left = 304
    Top = 166
    Width = 94
    Height = 20
    TabOrder = 10
    OnExit = Edt_PcTaxPrice_FormalExit
  end
  object Edt_PcNoTaxPrice_Formal: TEdit [29]
    Left = 304
    Top = 190
    Width = 94
    Height = 20
    TabOrder = 11
    OnExit = Edt_PcNoTaxPrice_FormalExit
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 368
    Top = 56
  end
end