关闭

TTreeView遍历

标签: function
406人阅读 评论(0) 收藏 举报
分类:
function AllOverTreeView(node:TTreenode):TTreenode;

begin

    while node<>nil do

    begin

     if node.HasChildren then

        begin

            node:=node.GetFirstChild;

             AllOverTreeView(node);

            node:=node.Parent;

        end;

     if node.getNextSibling<>nil then

           node:=node.getNextSibling

         else

           exit;

    end;

end;

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:79232次
    • 积分:1462
    • 等级:
    • 排名:千里之外
    • 原创:58篇
    • 转载:27篇
    • 译文:1篇
    • 评论:6条
    最新评论