高效的TreeView构建方法
来源:互联网 发布:网络协同 系统架构 编辑:程序博客网 时间:2024/04/30 07:57
高效的TreeView构建方法
网上一直有朋友说.net上的TreeView不够快,而且也不方便。那么真实的情况是否如此呢。我做的一项目中需要一个快速的Tree,它的数据源是MS SQL,其对应表中记录的结构如下:
ID
FatherID
Title
0101
01
基本建设支出
010109
0101
其它基本建设支出
其特点是父节点的ID正好是当前记录ID的长度-2所截取的字符串
因此我写下了如下代码:
一、普通的方法
Private Function BuildENTree(ByVal ds As DataSet)
Dim rs As DataRowCollection
Dim r As DataRow
Dim ID As String
Dim FatherID As String
Dim Title As String
Dim fn As TreeNode
Dim node As TreeNode
rs = ds.Tables(0).Rows
BootNode = New TreeNode
BootNode.Text = "[0] 所有单位"
BootNode.Tag = "0" '根目录
treeEN.Nodes.Add(BootNode)
For Each r In rs
ID = DirectCast(r.Item(0), String).Trim 'CODE
FatherID = DirectCast(r.Item(1), String).Trim 'FATHERCODE
Title = "[" & ID & "] " & DirectCast(r.Item(2), String).Trim 'TITLE
'查找与父节点ID相同的节点
fn = FindNode(FatherID)
If fn Is Nothing Then
'没找到对应ID的节点
Else
node = New TreeNode
With node
.Tag = ID
.Text = Title
End With
fn.Nodes.Add(node)
End If
Next
BootNode.Expand()
End Function
'在指定的节点下查找ID相符节点
Private Function FindNode(ByVal n As TreeNode, ByVal ID As String) As TreeNode
Dim ns As TreeNodeCollection
Dim node As TreeNode
Dim Flag As Boolean
Dim strText As String
Dim ReturnNode As TreeNode
Flag = False
If n.Tag = ID Then
Return n
Else
'如果路径根本不相同则返回
If (ID.Length < DirectCast(n.Tag, String).Length) OrElse ((n.Tag <> "0") AndAlso (ID.Substring(0, n.Tag.Length) <> n.Tag)) Then
Return Nothing
End If
ns = n.Nodes
For Each node In ns
ReturnNode = FindNode(node, ID)
If ReturnNode Is Nothing Then
'do nothing
Else
Flag = True
Exit For
End If
Next
If Flag = True Then Return ReturnNode
End If
Return Nothing
End Function
以上的代码利用将当前字节点的ID值存储于Node的Tag中,然后从根目录开始进行遍历进行查找。运行后发现其效率极为低下。但是网上的代码大多如此。
有没有其它方法可以增快其运行速度呢。
神说:“算法要么以空间换时间,要么以时间换空间”。
在某个时候我于是顿悟了。我发现我可以.net提供的HashTable,这可是个好东东。
那么如何来使用它呢?
二、快速的方法
首先我们需要增加一个定义
Private FastHashTable As Hashtable
然后需要将BuildENTree来做点小调整
Private Function BuildENTree(ByVal ds As DataSet)
Dim rs As DataRowCollection
Dim r As DataRow
Dim ID As String
Dim FatherID As String
Dim Title As String
Dim fn As TreeNode
Dim node As TreeNode
rs = ds.Tables(0).Rows
BootNode = New TreeNode
BootNode.Text = "[0] 所有单位"
BootNode.Tag = "0" '根目录
treeEN.Nodes.Add(BootNode)
FastHashTable.Add("0", BootNode)
For Each r In rs
ID = DirectCast(r.Item(0), String).Trim 'CODE
FatherID = DirectCast(r.Item(1), String).Trim 'FATHERCODE
Title = "[" & ID & "] " & DirectCast(r.Item(2), String).Trim 'TITLE
'查找与父节点ID相同的节点
fn = FindNode(FatherID)
If fn Is Nothing Then
'没找到对应ID的节点
Else
node = New TreeNode
With node
.Tag = ID
.Text = Title
End With
fn.Nodes.Add(node)
FastHashTable.Add(ID, node)
End If
Next
BootNode.Expand()
End Function
从以上代码看出,我只是增加了两处黑体的代码,它的作用就是将新增的节点不仅存到TreeView中,还要存到FashHashTable中,其关键字是ID值,只要没有重复的ID,那么就可以使用。
接下来我们还需要对FindNode进行改变。
'新版的快速查找
Private Function FindNode(ByVal ID As String) As TreeNode
Return FastHashTable.Item(ID)
End Function
好了,现在还有一个工作要做,就是要将FastHashTable进行初使化,尽量将其初使化成与你将要构建的数据节点数相同,我这个系统中是3000个节点,因此我增加了以下一句:
FastHashTable = New Hashtable(3000) '数量
现在,这个树已经很快了。
三、后记
即使是在.net时代,数据结构对我们也是很有用的。今天就到这儿吧!
- 高效的TreeView构建方法
- 高效的TreeView构建方法
- 不用递归的TreeView构建方法(优化方案)
- Asp.net TreeView来构建用户选择输入的方法
- [转]高效Hash构建方法
- treeview 的add方法
- TreeView的绑定方法
- 构建高效的MySQL分页
- 构建高效的结果缓存
- 构建java高效的缓存
- 基于哈希表构建高效 矩阵存储结构--矩阵的一种存储方法 哈希矩阵。
- TreeView数据绑定的方法
- Delphi TreeView的GetHitTestInfoAt()方法
- 利用Redis构建高效的实时搜索
- 构建高效的软件开发流程
- 如何构建高效的storm计算模型
- 如何构建高效的storm计算模型
- 如何构建高效的MySQL分页
- [翻译] Effective C++, 3rd Edition, Item 44: 从 templates(模板)中分离出 parameter-independent(参数无关)的代码(下)
- 项目中应用ant
- 老蒋的事迹
- 封装变化以实现去耦合
- 深入剖析JSP和Servlet对中文的处理
- 高效的TreeView构建方法
- 1111
- 3d 贪食蛇
- 今天我偷看了我家存折……(主要看精彩回复)
- QuickSort实现
- ASP常用函数表
- MergeSort的实现
- 在JSP页面中轻松实现数据饼图
- DELPHI切割文件代码