unit_manageroperate.dfm

一个不错的源程序DELPHI开发的,功能比较好的客户管理系统

        Caption = '客户经理'
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object ed_xb_desc: TFlatEdit
        Tag = 1
        Left = 287
        Top = 55
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
      end
      object ed_SID_C: TFlatEdit
        Tag = 1
        Left = 71
        Top = 7
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 1
      end
      object ed_off_no_home_desc: TFlatEdit
        Tag = 1
        Left = 287
        Top = 31
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 2
      end
      object ed_name: TFlatEdit
        Tag = 1
        Left = 287
        Top = 7
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 3
      end
      object ed_LXDH: TFlatEdit
        Tag = 1
        Left = 71
        Top = 103
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 4
      end
      object ed_DJDM_Desc: TFlatEdit
        Tag = 1
        Left = 71
        Top = 79
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 5
      end
      object ed_sxdm_desc: TFlatEdit
        Tag = 1
        Left = 71
        Top = 55
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 6
      end
      object ed_cityno_Desc: TFlatEdit
        Tag = 1
        Left = 71
        Top = 31
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 7
      end
      object ed_GH_C: TFlatEdit
        Tag = 1
        Left = 287
        Top = 79
        Width = 120
        Height = 20
        ColorFlat = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        ReadOnly = True
        TabOrder = 8
      end
    end
    object Panel2: TPanel
      Left = 1
      Top = 129
      Width = 466
      Height = 286
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 1
      object Splitter2: TSplitter
        Left = 217
        Top = 0
        Width = 3
        Height = 245
        Cursor = crHSplit
      end
      object Panel3: TPanel
        Left = 220
        Top = 0
        Width = 246
        Height = 245
        Align = alClient
        BevelOuter = bvNone
        Caption = 'Panel3'
        TabOrder = 0
        object Panel4: TPanel
          Left = 0
          Top = 0
          Width = 246
          Height = 25
          Align = alTop
          Caption = '客户状态'
          Font.Charset = ANSI_CHARSET
          Font.Color = clMaroon
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object Panel5: TPanel
          Left = 0
          Top = 25
          Width = 246
          Height = 220
          Align = alClient
          BevelOuter = bvLowered
          TabOrder = 1
          object lb_stat: TListBox
            Left = 1
            Top = 1
            Width = 244
            Height = 218
            Align = alClient
            BorderStyle = bsNone
            Columns = 2
            Enabled = False
            ItemHeight = 14
            TabOrder = 0
          end
        end
      end
      object Panel6: TPanel
        Left = 0
        Top = 0
        Width = 217
        Height = 245
        Align = alLeft
        BevelOuter = bvNone
        Caption = 'Panel3'
        TabOrder = 1
        object Panel7: TPanel
          Left = 0
          Top = 0
          Width = 217
          Height = 25
          Align = alTop
          Caption = '业务功能'
          Font.Charset = ANSI_CHARSET
          Font.Color = clMaroon
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object Panel8: TPanel
          Left = 0
          Top = 25
          Width = 217
          Height = 220
          Align = alClient
          BevelOuter = bvLowered
          TabOrder = 1
          object clb_operate: TCheckListBox
            Left = 1
            Top = 1
            Width = 215
            Height = 218
            Align = alClient
            BorderStyle = bsNone
            Columns = 2
            Enabled = False
            ItemHeight = 14
            TabOrder = 0
          end
        end
      end
      object Panel1: TPanel
        Left = 0
        Top = 245
        Width = 466
        Height = 41
        Align = alBottom
        BevelOuter = bvLowered
        TabOrder = 2
        object Btn_Modify: TFlatButton
          Tag = 2
          Left = 155
          Top = 8
          Width = 79
          Height = 25
          Caption = '业务处理'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
            000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
            00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
            F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
            0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
            FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
            FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
            0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
            00333377737FFFFF773333303300000003333337337777777333}
          Layout = blGlyphLeft
          NumGlyphs = 2
          ParentFont = False
          TabOrder = 0
          OnClick = Btn_ModifyClick
          Anchors = [akRight, akBottom]
        end
        object Btn_Cancel: TFlatButton
          Tag = 5
          Left = 311
          Top = 8
          Width = 75
          Height = 25
          Caption = '取消'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
            3333333777333777FF33339993707399933333773337F3777FF3399933000339
            9933377333777F3377F3399333707333993337733337333337FF993333333333
            399377F33333F333377F993333303333399377F33337FF333373993333707333
            333377F333777F333333993333101333333377F333777F3FFFFF993333000399
            999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
            99933773FF777F3F777F339993707399999333773F373F77777F333999999999
            3393333777333777337333333999993333333333377777333333}
          Layout = blGlyphLeft
          NumGlyphs = 2
          ParentFont = False
          TabOrder = 1
          OnClick = Btn_CancelClick
          Anchors = [akRight, akBottom]
        end
        object Btn_Save: TFlatButton
          Tag = 4
          Left = 235
          Top = 8
          Width = 75
          Height = 25
          Caption = '保存'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
            00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
            00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
            00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
            00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
            00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
            00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
            0003737FFFFFFFFF7F7330099999999900333777777777777733}
          Layout = blGlyphLeft
          NumGlyphs = 2
          ParentFont = False
          TabOrder = 2
          OnClick = Btn_SaveClick
          Anchors = [akRight, akBottom]
        end
        object Btn_Exit: TFlatButton
          Left = 387
          Top = 8
          Width = 75
          Height = 25
          Caption = '关闭'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000010000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
            F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
            000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
            338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
            45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
            3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
            F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
            000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
            338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
            4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
            8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
            333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
            0000}
          Layout = blGlyphLeft
          NumGlyphs = 2
          ParentFont = False
          TabOrder = 3
          OnClick = Btn_ExitClick
          Anchors = [akRight, akBottom]
        end
      end
    end
  end
  object Query_tmp: TQuery
    DatabaseName = 'db_vipdl'
    Left = 474
    Top = 81
  end
  object Query_CustInfo: TQuery
    AfterScroll = Query_CustInfoAfterScroll
    DatabaseName = 'db_vipdl'
    Left = 250
    Top = 178
  end
  object ds_CustInfo: TDataSource
    DataSet = Query_CustInfo
    Left = 330
    Top = 178
  end
end