摘要：
功能：删除树形结构的空节点；算法：1、先用AllOverTreeView函数递归遍历树形结构，将空节点添加到DelNodeList中； 2、然后再循环删除DelNodeList的所有节点；优点：速度很快，只要便利一次树形结构就可以将所有要删除的节点地址保存下来； 1 procedure TfrmMain.DelHoldNodeWhereNoObject; 2 var 3 i: Integer; 4 TreeNode: TTreeNode; 5 DelNodeList: TList; 6 //高性能遍历树形结构 7 function AllOverTreeView(no... 阅读全文
posted @ 2012-07-21 12:55
世界之窗
阅读(1232)
评论(0)
推荐(0)