PB 遍历一个 treeview ， 希望遍历出指定节点下的所有子节点

[Divina]

如题，望大虾们解答。
鄙人是新手，没有 PFC
急！！！！！

[liubocy]

点击tv_1上某个节点，点cb遍历其所有子节点

//声明实例变量long il_handle

//tv_1 selectionchanged事件：
il_handle = newhandle

//cb_1 clecked事件
long ll_handle, ll_level, ll_leveltmp
treeviewitem ltvi_1

ll_handle = il_handle
tv_1.getitem(ll_handle,ltvi_1)
ll_level = ltvi_1.level
ll_leveltmp = ll_level + 1
tv_1.expandall(ll_handle)
do while ll_leveltmp > ll_level
	ll_handle = tv_1.finditem(NextVisibleTreeItem! ,ll_handle)
	if ll_handle < 0 then exit
	tv_1.getitem(ll_handle,ltvi_1)
	ll_leveltmp = ltvi_1.level
  	if ll_leveltmp > ll_level then messagebox( '', ltvi_1.label )
  	tv_1.expandall(ll_handle)
loop

[Divina]

谢谢！没想到一个 NextVisibleTreeItem 就可以搞定 ， 做的时候只知道用 NextTreeItem ， 再次感谢～！

[jlwei888]

为TreeView控件添加一个用户事件ue_synchronizechildren(long handle)，代码如下：
long childitem
treeviewitem tvitem
getitem(handle, tvitem)
childitem=this.finditem(ChildTreeItem!, handle)
do while(childitem<>-1)
messagebox( '', tvitem.label )
this.Event ue_synchronizechildren(childitem) //递归遍历后代结点
childitem=this.finditem(NextTreeItem!, childitem)
loop

[Divina]

回复 楼上的 ：
我最初的想法也是走 递归遍历 ， 没递归明白 ，谢谢你的方法 。

我要结帖拉，因为我已经先接受了2L 的方法，所以把分数给你们四六开。多谢两为帮忙~！