熟悉树结构的请进,树的简单遍历问题 (100分)

  • 主题发起人 xingxingz
  • 开始时间
X

xingxingz

Unregistered / Unconfirmed
GUEST, unregistred user!
有一个树,根据数据库里面的数据生成到TreeView,如何单击某个节点后,
遍历该单击的节点下面的所有子节点,所单击的节点下面有可能还包括其它子树,
都要遍历一遍,谢谢。
例如树得结构如:
1
2
6
7
9
10
8
3
4
5
6

如上树结构,单击2节点后遍历2,6,7,8,9,10节点,
这里只是举得一个例子,2节点下面可能还包含N个节点或N个子树。
 
使用嵌套递归调用,
用堆栈也行
 
re: LiChaoHui
能够写上一段代码吗?谢谢!
 
procedure DoProcessNode(Node: TTreeNode);
begin
//write your proccess code
end;

procedure TravelNodes(BaseNode: TTreeNode);
var
i: Integer;
begin
DoProcessNode(BaseNode);
for i := 0 to BaseNode.Count - 1 do
begin
TravelNodes(BaseNode.Item);
end;
end;
 
顶部