是否有什么命令可以在 TREEVIEW 中查找到任一结点或子结点？

是否有什么命令可以在   TREEVIEW   中查找到任一结点或子结点？请给出详细代码。 问题点数：68、回复次数：7Top

1 楼jinjazz（近身剪）回复于 2005-06-03 17:43:56 得分 0

一个一个遍历Top

2 楼zjingl（风）回复于 2005-06-03 17:49:25 得分 0

TO   jinjazz(近身剪（充电中...）  
  怎样遍历，这不是很麻烦吗？请给出详细代码。  
  Top

3 楼ly_liuyang（Liu Yang LYSoft http://lysoft.7u7.net）回复于 2005-06-03 17:52:24 得分 1

没有  
  逐个找，GetNextNode之类的方法，自己看Help去  
   
  http://lysoft.7u7.netTop

4 楼cyblueboy83（爱情白痴—电脑迷）回复于 2005-06-03 18:03:54 得分 67

一个一个遍历  
  procedure   TForm1.Button1Click(Sender:   TObject);  
  var  
      i   :   Integer;  
  begin  
  //     showmessage(inttostr(TreeView1.Items.Count));  
   
      for   i   :=   0   to     TreeView1.Items.Count   -1   do  
      begin  
          if     TreeView1.Items[i].Text   =   '1'   then  
          begin  
              showmessage('Have   finded   it');  
          end;  
      end;  
  end;  
  Top

5 楼zjingl（风）回复于 2005-06-03 18:12:15 得分 0

谢谢   cyblueboy83(爱情白痴—电脑迷)    
  让我试试再给分，放心吧！      
  Top

6 楼zjingl（风）回复于 2005-06-04 17:07:23 得分 0

to   cyblueboy83(爱情白痴—电脑迷)    
  我还有几个   DELPHI   方面的问题在   DELPHI   社区，麻烦你搜索一下，帮我解答。  
  谢谢Top

7 楼cyblueboy83（爱情白痴—电脑迷）回复于 2005-06-09 13:35:04 得分 0

不是吧？  
  还要我帮你搜索？你贴出地址来呀?Top

相关问题

• treeview
• begin
• items

• 帖主：zjingl
• ly_liuyang
• cyblueboy83

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