inv110_02.dfm.svn-base

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

inherited Inv110_02Form: TInv110_02Form
  Caption = #24211#20301#36164#26009#32500#25252
  ClientHeight = 248
  ClientWidth = 521
  PixelsPerInch = 96
  TextHeight = 12
  inherited Bevel1: TBevel
    Width = 505
    Height = 201
  end
  object lblCode: TLabel [1]
    Tag = 1
    Left = 24
    Top = 56
    Width = 48
    Height = 12
    Caption = #24211#20301#32534#21495
  end
  object lblType: TLabel [2]
    Tag = 1
    Left = 280
    Top = 80
    Width = 48
    Height = 12
    Caption = #24211#20301#31867#22411
  end
  object lblWeight: TLabel [3]
    Left = 280
    Top = 104
    Width = 48
    Height = 12
    Caption = #23481#37325#33021#21147
  end
  object lblLoc: TLabel [4]
    Left = 24
    Top = 128
    Width = 48
    Height = 12
    Caption = #24211#20301#33021#21147
  end
  object lblStatues: TLabel [5]
    Tag = 1
    Left = 24
    Top = 80
    Width = 48
    Height = 12
    Caption = #24211#20301#29366#24577
  end
  object lblVolume: TLabel [6]
    Left = 24
    Top = 104
    Width = 48
    Height = 12
    Caption = #23481#31215#33021#21147
  end
  object sbWhsID: TSpeedButton [7]
    Left = 202
    Top = 24
    Width = 22
    Height = 20
    Flat = True
    Glyph.Data = {
      F6060000424DF606000000000000360000002800000018000000180000000100
      180000000000C006000000000000000000000000000000000000FF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000
      000000FF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FF000000C0C0C0000000FF00FFFF00FFFF00FFFF00FFFF00FF000000C0C0C0
      000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FF000000000000000000808080FF00FFFF00FFFF00FF80
      8080000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000000000
      00000000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000000000C0C0C0
      000000000000000000000000C0C0C0000000000000000000000000FF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
      FFFF000000C0C0C0000000000000000000000000C0C0C0000000000000000000
      000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
      00FFFFFF80808080808000000000000000000000000000000000000000000000
      0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000
      00C0C0C0000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFF808080808080FFFFFF808080
      000000000000808080808080FFFFFF000000000000FF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF000000000000FF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
      00FFFFFF808080808080FFFFFF808080000000000000808080808080FFFFFF00
      0000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFBF0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000BF0000BF0000
      BF0000BF0000BF0000BF0000BF0000BF0000FF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000C0C0C0BF0000BF
      0000C0C0C0BF0000BF0000C0C0C0BF0000BF0000C0C0C0BF0000FF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
      00BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF
      0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
    OnClick = sbWhsIDClick
  end
  object lblName: TLabel [8]
    Tag = 1
    Left = 208
    Top = 56
    Width = 48
    Height = 12
    Caption = #24211#20301#21517#31216
  end
  object lblWhsID: TLabel [9]
    Tag = 1
    Left = 24
    Top = 32
    Width = 48
    Height = 12
    Caption = #20179#24211#32534#21495
  end
  object lblVol: TLabel [10]
    Left = 208
    Top = 104
    Width = 36
    Height = 12
    Caption = #31435#26041#31859
  end
  object lblWei: TLabel [11]
    Left = 464
    Top = 104
    Width = 24
    Height = 12
    Caption = #21315#20811
  end
  object lblLocate: TLabel [12]
    Left = 208
    Top = 128
    Width = 24
    Height = 12
    Caption = #25176#30424
  end
  inherited bbtnOk: TBitBtn
    Left = 344
    Top = 216
    TabOrder = 11
  end
  inherited bbtnExit: TBitBtn
    Left = 424
    Top = 216
    TabOrder = 12
  end
  object edtCode: TEdit [15]
    Left = 80
    Top = 48
    Width = 121
    Height = 20
    TabOrder = 2
  end
  object edtName: TEdit [16]
    Left = 264
    Top = 48
    Width = 233
    Height = 20
    TabOrder = 3
  end
  object edtLoc: TEdit [17]
    Left = 80
    Top = 120
    Width = 121
    Height = 20
    TabOrder = 8
    OnKeyPress = edtVolumeKeyPress
  end
  object edtVolume: TEdit [18]
    Left = 80
    Top = 96
    Width = 121
    Height = 20
    TabOrder = 6
    OnKeyPress = edtVolumeKeyPress
  end
  object cbIsAllocate: TCheckBox [19]
    Tag = 1
    Left = 80
    Top = 152
    Width = 305
    Height = 17
    Caption = #20801#35768#23558#35813#20179#24211#30340#26009#21697#30340#29616#26377#24211#23384#20998#37197#32473#38144#21806#23450#21333
    TabOrder = 9
  end
  object cbIsMRP: TCheckBox [20]
    Tag = 1
    Left = 80
    Top = 176
    Width = 305
    Height = 17
    Caption = #20801#35768#35813#20179#24211#30340#26009#21697#21442#19982' MRP'#65288#29289#26009#38656#27714#35745#21010#65289#30340#35745#31639
    TabOrder = 10
  end
  object edtWhsID: TEdit [21]
    Left = 80
    Top = 24
    Width = 121
    Height = 20
    TabOrder = 0
    OnExit = edtWhsIDExit
  end
  object edtWhsName: TEdit [22]
    Left = 232
    Top = 24
    Width = 265
    Height = 20
    Color = clBtnFace
    Enabled = False
    TabOrder = 1
  end
  object cbType: TComboBox [23]
    Left = 336
    Top = 72
    Width = 161
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    ItemIndex = 0
    TabOrder = 5
    Text = #23384#20648#21306
    Items.Strings = (
      #23384#20648#21306
      #21457#36135#21306
      #25910#36135#21306
      #26816#39564#21306)
  end
  object cbStatues: TComboBox [24]
    Left = 80
    Top = 72
    Width = 161
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    ItemIndex = 0
    TabOrder = 4
    Text = #21487#29992
    Items.Strings = (
      #21487#29992
      #31105#29992)
  end
  object edtWeight: TEdit [25]
    Left = 336
    Top = 96
    Width = 121
    Height = 20
    TabOrder = 7
    OnKeyPress = edtVolumeKeyPress
  end
  inherited pmUISet: TPopupMenu
    Top = 192
  end
  inherited ADOQuery1: TADOQuery
    SQL.Strings = (
      
        'select A.*,B.I100_002,I100_003 from INV110 A,INV100 B where I110' +
        '_002=I100_001 order by I110_002,I110_003')
    Top = 192
  end
  object qryInv100: TADOQuery
    Connection = SYSDM.ADOC
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select I100_001,I100_002,I100_003,I100_010,I100_011 from INV100 ' +
        'order by I100_002')
    Left = 136
    Top = 16
    object qryInv100I100_001: TAutoIncField
      FieldName = 'I100_001'
      ReadOnly = True
      Visible = False
    end
    object qryInv100I100_002: TWideStringField
      DisplayLabel = #20179#24211#32534#21495
      FieldName = 'I100_002'
    end
    object qryInv100I100_003: TWideStringField
      DisplayLabel = #20179#24211#21517#31216
      FieldName = 'I100_003'
      Size = 50
    end
    object qryInv100I100_010: TBooleanField
      FieldName = 'I100_010'
      Visible = False
    end
    object qryInv100I100_011: TBooleanField
      FieldName = 'I100_011'
      Visible = False
    end
  end
end