扩展 TreeView 控件（三）-控件新闻-慧都网

扩展 TreeView 控件（三）

翻译|其它|编辑：郝浩|2005-03-14 11:12:00.000|阅读 964 次

概述：

将 DataSource 转变为树

编写完数据绑定代码后，我可以继续添加管理分组级别的代码，相应地生成树，然后添加一些自定义事件、方法和属性。

管理组

程序员要配置组集合，就必须创建 AddGroup、RemoveGroup 和 ClearGroups 函数。每当修改组集合时，都必须重新绘制树（以反映新配置），因此我创建了一个通用过程 GroupingChanged，当情况发生变化，需要强制重建树时，它可以由控件中的各种代码调用：

Private treeGroups As New ArrayList()

Public Sub RemoveGroup(ByVal group As Group)
If Not treeGroups.Contains(group) Then
treeGroups.Remove(group)
GroupingChanged()
End If
End Sub

Public Overloads Sub AddGroup(ByVal group As Group)
Try
treeGroups.Add(group)
GroupingChanged()
Catch
End Try
End Sub

Public Overloads Sub AddGroup(ByVal name As String, _
ByVal groupBy As String, _
ByVal displayMember As String, _
ByVal valueMember As String, _
ByVal imageIndex As Integer, _
ByVal selectedImageIndex As Integer)
Dim myNewGroup As New Group(name, groupBy, _
displayMember, valueMember, _
imageIndex, selectedImageIndex)
Me.AddGroup(myNewGroup)
End Sub

Public Function GetGroups() As Group()
Return CType(treeGroups.ToArray(GetType(Group)), Group())
End Function

生成树

树的实际重建由一对过程来完成：BuildTree 和 AddNodes。由于这两个过程的代码太长，本文并未全部列出，而是尽量概括它们的行为（当然，如果愿意您可以下载完整的代码）。如前所述，程序员可以通过设置一系列组与该控件进行交互，然后在 BuildTree 中使用这些组来确定如何设置树节点。BuildTree 清除当前节点集合，然后遍历整个数据源来处理第一级分组（本文前面的示例和图解中提到的 Publisher），为每个不同的分组值添加一个节点（使用示例中的数据，为每个 pub_id 值添加一个节点），然后调用 AddNodes 来填充第一级分组下的所有节点。AddNodes 递归调用自身以处理任意多的级数，必要时可添加组节点和叶节点。使用两个基于 TreeNode 的自定义类以区别组节点和叶节点，并为两类节点提供各自相应的属性。

自定义 TreeView 事件

每当选择一个节点时，TreeView 都会引发两个事件：BeforeSelect 和 AfterSelect。但在我的控件中，我想使组节点和叶节点的事件不同，于是便添加了自己的事件 BeforeGroupSelect/AfterGroupSelect 和 BeforeLeafSelect/AfterLeafSelect，除基本事件外，还引发了自定义事件参数类：

Public Event BeforeGroupSelect _
(ByVal sender As Object, ByVal e As groupTreeViewCancelEventArgs)
Public Event AfterGroupSelect _
(ByVal sender As Object, ByVal e As groupTreeViewEventArgs)
Public Event BeforeLeafSelect _
(ByVal sender As Object, ByVal e As leafTreeViewCancelEventArgs)
Public Event AfterLeafSelect _
(ByVal sender As Object, ByVal e As leafTreeViewEventArgs)

Protected Overrides Sub OnBeforeSelect _
(ByVal e As System.Windows.Forms.TreeViewCancelEventArgs)
If TypeOf e.Node Is TreeGroupNode Then
Dim groupArgs As New groupTreeViewCancelEventArgs(e)
RaiseEvent BeforeGroupSelect(CObj(Me), groupArgs)
ElseIf TypeOf e.Node Is TreeLeafNode Then
Dim leafArgs As New leafTreeViewCancelEventArgs(e)
RaiseEvent BeforeLeafSelect(CObj(Me), leafArgs)
End If
MyBase.OnBeforeSelect(e)
End Sub

Protected Overrides Sub OnAfterSelect _
(ByVal e As System.Windows.Forms.TreeViewEventArgs)
Dim tln As TreeLeafNode
If TypeOf e.Node Is TreeGroupNode Then
tln = FindFirstLeafNode(e.Node)
Dim groupArgs As New groupTreeViewEventArgs(e)
RaiseEvent AfterGroupSelect(CObj(Me), groupArgs)
ElseIf TypeOf e.Node Is TreeLeafNode Then
Dim leafArgs As New leafTreeViewEventArgs(e)
RaiseEvent AfterLeafSelect(CObj(Me), leafArgs)
tln = CType(e.Node, TreeLeafNode)
End If

If Not tln Is Nothing Then
If cm.Position <> tln.Position Then
cm.Position = tln.Position
End If
End If
MyBase.OnAfterSelect(e)
End Sub
　

自定义节点类（TreeLeafNode 和 TreeGroupNode）和自定义事件参数类均包括在可下载代码中。

示例应用程序

要全面理解本示例控件中的所有代码，您应该了解它在应用程序中的运行情况。包含的示例应用程序使用 pubs.mdb Access 数据库，并说明 Tree 控件如何与其他数据绑定控件一起创建 Windows 应用程序。本例中，尤其值得注意的主要功能包括树与其他绑定控件的同步以及对数据源执行搜索时树节点的自动选择。

注意：本示例应用程序（名为“TheSample”）包含在本文的下载中。

图 4：数据绑定 TreeView 的演示应用程序

小结
本文介绍的数据绑定 Tree 控件并非适用于所有需要 Tree 控件来显示数据库信息的项目，但它确实介绍了一种可针对个人目的自定义该控件的方法。请记住，您要生成的任何复杂数据绑定控件与 Tree 控件的大部分代码基本相同，您可以通过修改现有代码来简化以后的控件开发过程。

在下一个示例 Drawing Your Own Controls Using GDI+（英文）中，您将看到在不需要使用特定基类（就象我在该控件中继承了 TreeView 控件一样）的情况下，实现数据绑定有一个更容易的方法。
　