多层树的生成

解决方案 »

  1.   

    我收录了一篇生成树的文章,希望有帮助
    http://blog.csdn.net/S_Slan/archive/2008/01/17/2048361.aspx
      

  2.   

    类似于这样吧..........
    这儿只创建了两层的树,如果多层的话,楼主自己扩展吧。
    对于更多层的复杂的树,楼主可以用递归或是迭代来实现。var newnode:ttreenode;with treeview.items do
    begin
      beginupdate;
      clear;
      newnode:=addchild(nil,'root');
      addchild(newnode,'child1');
      endupdate;   
    end;