各位高手帮帮忙

Question

关于TreeView控件的问题，我建立了一个根节点，根节点的子节点，子节点的子节点。根节点和子节点的子节点我能取到它们的文本内容。可根节点的子节点如何取得呢？我用几个循环来提取数据并创建节点。（这个方法很笨）希望能得到高手的帮忙。谢谢！

Answer 1

看不明白，给你一个用递归方法查询一棵树的函数，
function gettree(StartTreeNode: TTreeNode):string;
var
procedure searchsub(TreeNode: TTreeNode);
begin
   if TreeNode.Level<>0 then
         begin
         searchsub(TreeNode.Parent);
         gs1:=gs1+'|'+TreeNode.Text;
         end else
               gs1:=gs1+TreeNode.Text;
end;
begin
gs1:='';
searchsub(StartTreeNode);
result:=gs1;
end;showmessage(gettree( treeview1.Selected));
会从指定节点向上遍历，直到所属的根节点。