如何在treeview的第3个跟节点，添加子节点？

我老添加到第1个跟节点的第2个字节点里  
              if   paterurl   =   ''   then  
              begin  
                  treeview1.Items.add(nil,   url);  
              end  
              else  
              begin  
                      treeview1.Items.AddChild(treeview1.Items[treecount-1],url)  
              end; 问题点数：20、回复次数：5Top

1 楼chechy（www.qdocuments.net）回复于 2002-03-28 09:28:59 得分 0

if   paterurl   =   ''   then  
              begin  
                  treeview1.Items.add(nil,   url);  
              end  
              else  
              begin  
                      treeview1.Items.AddChild(treeview1.Items[0].GetNextSibling.GetNextSibling,url)  
              end;  
  Top

2 楼liaokuo（辽阔）回复于 2002-03-28 09:38:39 得分 0

不太好用  
  能不能得到最后1个根节点的count数？Top

3 楼liaokuo（辽阔）回复于 2002-03-28 09:41:48 得分 0

或者如何在最后1个根节点添加子节点？Top

4 楼chechy（www.qdocuments.net）回复于 2002-03-28 09:49:41 得分 20

没什么好办法，只能循环  
  Result   :=   treeview1.Items[0];  
  while   Result.GetNextSibling   <>   nil   do  
      Result   :=   Result.GetNextSibling;Top

5 楼chechy（www.qdocuments.net）回复于 2002-03-28 09:50:17 得分 0

treeview1.Items.AddChild(result,   url);Top

相关问题

• 节点
• treeview1
• getnextsibling
• 添加
• addchild
• nil
• items
• begin
• result
• url

• 帖主：liaokuo
• chechy

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载