TreeList控制元件可以同時顯示樹結構和其他資料列，即在一個列上建立父子關係展開或收縮，同時還可以顯示其他列的內容。

在TreeList中同時引入了
Node和 Columns概念,
第一列為樹結構,
其餘列為資料列,
任何列都可作為樹結構列(即拖動到第一列)顯示

1.實現多級樹－－－資料來源繫結

在TreeList裡新增要顯示列（第一列為樹結構，其他列為資料列），並指定FieldName為資料庫列名

指定KeyFieldName屬性為主鍵，ParentFieldName屬性為樹狀分組列。注意
ParentFieldName指定的列如果為空值，樹狀可能會混亂（只有一個根結點，其他為此節點的子結點）

用TreeList.DataSource = DataTable 繫結資料即可

（以下內容為轉載）多選框的三種狀態

樹形控制元件是使用頻率很高的一種控制元件。對於屬性控制元件往往需要下面兩個功能
1.TreeList帶有CheckBox，並且節點要有三種狀態（所有的子節點都選中，所有的子節點都沒選擇，一部分子節點選中）。使用DevXpress的TreeList控制元件很容易實現這一功能。
設定TreeList.OptionsView.ShowCheckBoxes = true //是否顯示CheckBox
設定TreeList.OptionsBehavior.AllowIndeterminateCheckState = true; //設定節點是否有中間狀態，即一部分子節點選中，一部分子節點沒有選中
設定這兩個屬性之後就實現了TreeList帶有CheckBox,並且節點有三種狀態。
2.選中父節點或者子節點相互影響的功能，如選擇父節點選擇所有子節點。繫結TreeList的兩個事件AfterCheckNode和BeforeCheckNode
實現功能的程式碼如下：
private void treeList1_AfterCheckNode(object sender, DevExpress.XtraTreeList.NodeEventArgs e)
{
SetCheckedChildNodes(e.Node, e.Node.CheckState);
SetCheckedParentNodes(e.Node, e.Node.CheckState);
}
private void treeList1_BeforeCheckNode(object sender, DevExpress.XtraTreeList.CheckNodeEventArgs e)
{
e.State = (e.PrevState == CheckState.Checked ? CheckState.Unchecked : CheckState.Checked);
}
///
/// 設定子節點的狀態
///
///
///
private void SetCheckedChildNodes(TreeListNode node, CheckState check)
{
for (int i = 0; i < node.Nodes.Count; i++)
{
node.Nodes[i].CheckState = check;
SetCheckedChildNodes(node.Nodes[i], check);
}
}
///
/// 設定父節點的狀態
///
///
///
private void SetCheckedParentNodes(TreeListNode node, CheckState check)
{
if (node.ParentNode != null)
{
bool b = false;
CheckState state;
for (int i = 0; i < node.ParentNode.Nodes.Count; i++)
{
state = (CheckState)node.ParentNode.Nodes[i].CheckState;
if (!check.Equals(state))
{
b = !b;
break;
}
}
node.ParentNode.CheckState = b ? CheckState.Indeterminate : check;
SetCheckedParentNodes(node.ParentNode, check);
}
}
VB.net語言程式碼如下
Private Sub trlContact_AfterCheckNode(ByVal sender As System.Object, ByVal e As DevExpress.XtraTreeList.NodeEventArgs) Handles trlContact.AfterCheckNode
SetCheckedChildNodes(e.Node, e.Node.CheckState)
SetCheckedParentNodes(e.Node, e.Node.CheckState)
End Sub
‘設定子結點的狀態
Private Sub SetCheckedChildNodes(ByVal node As TreeListNode, ByVal check As CheckState)

    For i As Integer = 0 To node.Nodes.Count - 1
        node.Nodes(i).CheckState = check
        SetCheckedChildNodes(node.Nodes(i), check)
    Next
End Sub
'設定父結點的狀態
Private Sub SetCheckedParentNodes(ByVal node As TreeListNode, ByVal check As CheckState)
    If node.ParentNode Is Nothing = False Then
        Dim b As Boolean = False
        Dim state As CheckState
        For i As Integer = 0 To node.ParentNode.Nodes.Count - 1
            state = node.ParentNode.Nodes(i).CheckState
            If check.Equals(state) = False Then
                b = Not b
                Exit For
            End If
        Next

        If b Then
            node.ParentNode.CheckState = CheckState.Indeterminate
        Else
            node.ParentNode.CheckState = check
        End If

        SetCheckedParentNodes(node.ParentNode, check)
    End If
End Sub


Private Sub trlContact_BeforeCheckNode(ByVal sender As System.Object, ByVal e As DevExpress.XtraTreeList.CheckNodeEventArgs) Handles trlContact.BeforeCheckNode

    If e.PrevState = CheckState.Checked Then
        e.State = CheckState.Unchecked
    Else
        e.State = CheckState.Checked
    End If

End Sub!