关于treeview还有一个小问题，请帮一下(50分)

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-06

• #1

现在动态建了几个根结点，每个根结点都有好几个子结点，问题：运行中，我展开了所有的根结点，任意点取某个子结点，这时我需根知道这个子结点对应的根结点是哪个？

 

D

dey-999

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-06

• #2

function GetParentNode(Node:TTreeNode):TTreeNode;
begin
if Node=nil then begin
Result:=nil;
exit;
end;
if Node.Parent=nil then
Result:=Node
else
Result:=GetParentNode(Node.Parent);
end;

 

由

由由(love)

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-06

• #3

在ONCHANGE事件中写：
Node.ParentNode取得的是上一级节点，如果上一级节点为NIL，则就是根节点了！

 

W

weichao9999

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-06

• #4

//没有调试
Function GetParentNode(Node:TTreeNode):TTreeNode;
begin
result:=Node;
if result=nil then exit;
while result.Parent<>nil do
result:=result.Parent;
end;

 

L

linda407

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-06

• #5

好详细啊

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-06

• #6

to:由由：你的可能要简单一点，我试了一下，总是报Node.ParentNode错，请再讲清楚一点，谢谢

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-06

• #7

谢谢，我用了dey-999的方法，不错，给分了，再次谢谢。