mmoitm.dfm

阀门厂的合同管理含销售 等

        Width = 129
        Height = 1
        Pen.Color = clWhite
      end
      object Shape7: TShape
        Left = 8
        Top = 25
        Width = 129
        Height = 1
        Pen.Color = clWhite
      end
      object Label10: TLabel
        Left = 8
        Top = 88
        Width = 57
        Height = 13
        Caption = #22686#20540#31246#39069'   '
      end
      object Shape16: TShape
        Left = 8
        Top = 105
        Width = 129
        Height = 1
        Pen.Color = clWhite
      end
      object DBEdit7: TDBEdit
        Left = 136
        Top = 8
        Width = 121
        Height = 18
        BorderStyle = bsNone
        DataField = 'SalUnitMsr'
        DataSource = DataSource1
        TabOrder = 0
      end
      object DBEdit9: TDBEdit
        Left = 384
        Top = 8
        Width = 161
        Height = 18
        BorderStyle = bsNone
        DataField = 'SHeight1'
        DataSource = DataSource1
        TabOrder = 1
      end
      object DBEdit15: TDBEdit
        Left = 136
        Top = 88
        Width = 121
        Height = 18
        BorderStyle = bsNone
        DataField = 'VatGourpSa'
        DataSource = DataSource1
        TabOrder = 2
      end
      object DBEdit16: TDBEdit
        Left = 263
        Top = 88
        Width = 58
        Height = 18
        BorderStyle = bsNone
        DataField = 'RetilrTax'
        DataSource = DataSource1
        TabOrder = 3
      end
    end
    object TabSheet3: TTabSheet
      Caption = '   '#20179#24211#25968#25454'    '
      ImageIndex = 2
      object Label9: TLabel
        Left = 8
        Top = 8
        Width = 141
        Height = 13
        Caption = #35201#27714#24211#23384#65288#37319#36141#21333#20301#65289'       '
      end
      object Label16: TLabel
        Left = 8
        Top = 30
        Width = 69
        Height = 13
        Caption = #26368#22823#24211#23384#37327'   '
      end
      object Shape8: TShape
        Left = 8
        Top = 45
        Width = 129
        Height = 1
        Pen.Color = clWhite
      end
      object Shape9: TShape
        Left = 8
        Top = 25
        Width = 129
        Height = 1
        Pen.Color = clWhite
      end
      object Shape19: TShape
        Left = 8
        Top = 65
        Width = 129
        Height = 1
        Pen.Color = clWhite
      end
      object Label20: TLabel
        Left = 8
        Top = 50
        Width = 75
        Height = 13
        Caption = #26368#23567#24211#23384#37327'     '
      end
      object DBGrid1: TDBGrid
        Left = 8
        Top = 96
        Width = 537
        Height = 120
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Visible = False
      end
      object DBEdit8: TDBEdit
        Left = 136
        Top = 8
        Width = 49
        Height = 18
        BorderStyle = bsNone
        DataField = 'BuyUnitMsr'
        DataSource = DataSource1
        TabOrder = 1
      end
      object DBEdit20: TDBEdit
        Left = 136
        Top = 48
        Width = 230
        Height = 18
        BorderStyle = bsNone
        DataField = 'MinLevel'
        DataSource = DataSource1
        TabOrder = 2
      end
      object DBEdit21: TDBEdit
        Left = 136
        Top = 28
        Width = 230
        Height = 18
        BorderStyle = bsNone
        DataField = 'MaxLevel'
        DataSource = DataSource1
        TabOrder = 3
      end
      object DBEdit23: TDBEdit
        Left = 192
        Top = 8
        Width = 49
        Height = 18
        BorderStyle = bsNone
        DataField = 'ReorderQty'
        DataSource = DataSource1
        TabOrder = 4
      end
    end
    object TabSheet4: TTabSheet
      Caption = '   '#27010#36848'   '
      ImageIndex = 3
      object Label17: TLabel
        Left = 8
        Top = 78
        Width = 51
        Height = 13
        Caption = #36816#36755#31867#22411' '
      end
      object Shape17: TShape
        Left = 8
        Top = 95
        Width = 129
        Height = 1
        Pen.Color = clWhite
      end
      object DBComboBox2: TDBComboBox
        Left = 136
        Top = 75
        Width = 121
        Height = 21
        BevelOuter = bvNone
        BevelKind = bkFlat
        Ctl3D = False
        DataField = 'ShipType'
        DataSource = DataSource1
        ItemHeight = 13
        Items.Strings = (
          #28023#36816
          #31354#36816
          #38470#36335)
        ParentCtl3D = False
        TabOrder = 0
      end
    end
    object TabSheet5: TTabSheet
      Caption = '     '#26126#32454'     '
      ImageIndex = 4
      object Image2: TImage
        Left = 504
        Top = 184
        Width = 32
        Height = 32
        AutoSize = True
        Picture.Data = {
          055449636F6E0000010001002020040000000000E80200001600000028000000
          2000000040000000010004000000000000020000000000000000000000000000
          0000000000000000000080000080000000808000800000008000800080800000
          C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
          FFFFFF0000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000044444444444444444
          0000000004444440000555555555000044440000478888000280000000008000
          0028400087888800280088888884080000288400878888028048888888884080
          0028804087888808448880000088840800288004878888080888064444088848
          0028800487888808288066644440884800288004878888082880E66644408848
          00288004878888082780EE666660884800288004878888088780EE6666608848
          002880048788880887806EEE666088480028800487888808878806EEE6088848
          0028800487888808887880000088800800288004878888088887888888880008
          0028800487888800888877788880008000288004878888088888222220000080
          0028800488887777788282220000887777778004088888888888888888888888
          8888000400080000008878888800800000000040000007888008788888008007
          8880040000000078008887888888888078000000000000000000088888000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          00000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE0000FF8000000F
          0000000700000003000000010000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          80000000E0000001F0000003F800000FFC783F1FFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFF}
        OnClick = Image2Click
      end
      object DBImage1: TDBImage
        Left = 8
        Top = 8
        Width = 481
        Height = 217
        BorderStyle = bsNone
        DataField = 'PicturName'
        DataSource = DataSource1
        TabOrder = 0
      end
    end
  end
  object DBCheckBox1: TDBCheckBox
    Left = 384
    Top = 8
    Width = 97
    Height = 17
    Caption = #37319#36141#29289#26009
    DataField = 'PrchseItem'
    DataSource = DataSource1
    TabOrder = 8
    ValueChecked = 'True'
    ValueUnchecked = 'False'
  end
  object DBCheckBox2: TDBCheckBox
    Left = 384
    Top = 25
    Width = 97
    Height = 18
    Caption = #38144#21806#29289#26009
    DataField = 'SellItem'
    DataSource = DataSource1
    TabOrder = 9
    ValueChecked = 'True'
    ValueUnchecked = 'False'
  end
  object DBCheckBox3: TDBCheckBox
    Left = 384
    Top = 43
    Width = 97
    Height = 17
    Caption = #20179#24211#29289#26009
    DataField = 'InvntItem'
    DataSource = DataSource1
    TabOrder = 10
    ValueChecked = 'True'
    ValueUnchecked = 'False'
  end
  object DBComboBox1: TDBComboBox
    Left = 136
    Top = 107
    Width = 121
    Height = 21
    BevelOuter = bvNone
    BevelKind = bkFlat
    Ctl3D = False
    DataField = 'PriceList'
    DataSource = DataSource2
    ItemHeight = 13
    ParentCtl3D = False
    TabOrder = 11
    Visible = False
  end
  object DBEdit10: TDBEdit
    Left = 261
    Top = 108
    Width = 105
    Height = 20
    BorderStyle = bsNone
    DataField = 'Price'
    DataSource = DataSource2
    TabOrder = 12
    Visible = False
  end
  object DBCheckBox4: TDBCheckBox
    Left = 384
    Top = 75
    Width = 97
    Height = 17
    Caption = #22266#23450#36164#20135
    DataField = 'AssetItem'
    DataSource = DataSource1
    TabOrder = 13
    ValueChecked = 'True'
    ValueUnchecked = 'False'
    Visible = False
  end
  object DataSource1: TDataSource
    DataSet = ADOQuP1
    OnDataChange = DataSource1DataChange
    Left = 104
    Top = 40
  end
  object DataSource2: TDataSource
    DataSet = ADOQuP2
    Left = 424
    Top = 104
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 512
    Top = 104
  end
  object ADOQuP1: TADOQuery
    Connection = DataModHJ.ADOCon
    Parameters = <
      item
        Name = 'P0'
        DataType = ftVariant
        Value = 0c
      end>
    SQL.Strings = (
      '')
    Left = 256
    Top = 40
  end
  object ADOQuP2: TADOQuery
    Connection = DataModHJ.ADOCon
    Parameters = <
      item
        Name = 'P0'
        DataType = ftVariant
        Value = 0c
      end>
    Left = 384
    Top = 104
  end
end