object frmCPType: TfrmCPType
  Left = 281
  Top = 184
  Width = 870
  Height = 505
  Caption = #20135#21697#31867#21035
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 854
    Height = 33
    ButtonHeight = 30
    ButtonWidth = 83
    Caption = 'ToolBar1'
    Color = clSkyBlue
    DisabledImages = DataLink_DDMD.ThreeImgList
    Flat = True
    Images = DataLink_DDMD.ThreeImgList
    List = True
    ParentColor = False
    ShowCaptions = True
    TabOrder = 0
    object TBRafresh: TToolButton
      Left = 0
      Top = 0
      AutoSize = True
      Caption = #21047#26032
      ImageIndex = 0
      OnClick = TBRafreshClick
    end
    object TBAdd: TToolButton
      Left = 63
      Top = 0
      AutoSize = True
      Caption = #26032#22686#23376#31867
      ImageIndex = 12
      OnClick = TBAddClick
    end
    object ToolButton1: TToolButton
      Left = 150
      Top = 0
      AutoSize = True
      Caption = #20445#23384
      ImageIndex = 5
      OnClick = ToolButton1Click
    end
    object TBDel: TToolButton
      Left = 213
      Top = 0
      AutoSize = True
      Caption = #21024#38500
      ImageIndex = 3
      OnClick = TBDelClick
    end
    object TBClose: TToolButton
      Left = 276
      Top = 0
      AutoSize = True
      Caption = #20851#38381
      ImageIndex = 21
      OnClick = TBCloseClick
    end
  end
  object cxDBTreeList1: TcxDBTreeList
    Left = 0
    Top = 33
    Width = 249
    Height = 433
    Align = alLeft
    Bands = <
      item
      end>
    BufferedPaint = False
    DataController.DataSource = DataSource1
    DataController.ParentField = 'CPParent'
    DataController.KeyField = 'CPID'
    OptionsBehavior.ExpandOnDblClick = False
    OptionsSelection.CellSelect = False
    OptionsView.CellAutoHeight = True
    OptionsView.Headers = False
    RootValue = -1
    TabOrder = 1
    OnClick = cxDBTreeList1Click
    object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn
      DataBinding.FieldName = 'CPName'
      Width = 210
      Position.ColIndex = 1
      Position.RowIndex = 0
      Position.BandIndex = 0
    end
  end
  object Panel1: TPanel
    Left = 270
    Top = 54
    Width = 315
    Height = 150
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Color = clSkyBlue
    TabOrder = 2
    object Label1: TLabel
      Left = 66
      Top = 24
      Width = 48
      Height = 12
      Caption = #29238'    '#31867
    end
    object Label2: TLabel
      Left = 66
      Top = 65
      Width = 48
      Height = 12
      Caption = #31867#21035#21517#31216
    end
    object Label3: TLabel
      Left = 66
      Top = 105
      Width = 48
      Height = 12
      Caption = #31867#21035#32534#30721
    end
    object CPTopName: TEdit
      Left = 129
      Top = 21
      Width = 121
      Height = 20
      ReadOnly = True
      TabOrder = 0
    end
    object CPName: TEdit
      Left = 129
      Top = 61
      Width = 121
      Height = 20
      TabOrder = 1
      OnKeyPress = CPNameKeyPress
    end
    object CPNo: TEdit
      Left = 129
      Top = 101
      Width = 121
      Height = 20
      TabOrder = 2
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQueryTree
    Left = 91
    Top = 147
  end
  object ADOQueryTree10: TADOQuery
    Connection = DataLink_DDMD.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 125
    Top = 145
  end
  object ADOQueryTemp: TADOQuery
    Connection = DataLink_DDMD.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 709
    Top = 209
  end
  object ADOQueryCmd: TADOQuery
    Connection = DataLink_DDMD.ADOLink
    Parameters = <>
    Left = 677
    Top = 137
  end
  object ADOQueryTree: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 160
    Top = 152
  end
end
