Delphi TreeView遍历所有节点问题
来源:互联网 发布:护肤品推荐知乎 编辑:程序博客网 时间:2024/05/16 11:17
Delphi TreeView遍历所有节点问题
遍历出TREEVIEW的所有完整的节点名称
请出能实现这个功能的有效代码
procedure aa(s:string;aItem:TTreeNode);
var
node:TTreeNode;
str:string;
begin
node:=aItem;
while node<>nil do begin
if s='' then str:=node.Text else str:=s+'\'+node.Text;
form1.ListBox1.Items.Add(str);
if node.HasChildren then aa(str,node.getFirstChild);
node:=node.getNextSibling;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
aa('',TreeView1.Items.GetFirstNode);
end;
在delphi xe5上测试通过,下面是图片效果:
for i := 0 to TreeView.Items.count -1 do
Memo.lines.add(TreeView.Items[i].text);
0 0
- Delphi TreeView遍历所有节点问题
- delphi treeview 遍历所有子集节点
- delphi 遍历treeview某个节点下所有节点的函数
- delphi 遍历Treeview特定节点下的所有节点
- delphi 遍历treeview某个节点下所有节点的函数
- delphi 遍历treeview某个节点下所有节点的函数
- 前台遍历TreeView所有节点
- C# 遍历TreeView所有节点
- delphi 递归遍历TreeView树节点
- delphi treeview添加节点
- treeview节点遍历
- TreeView控件节点遍历
- 遍历treeview下所有的节点,包括子节点,以勾选为例
- TreeView(一次性递归所有节点)
- TreeView(一次性递归所有节点)
- TreeView默认展开所有节点
- C#递归遍历TreeView节点
- TreeView节点选择问题
- 跟踪系统性能(8)
- corosync+pacemaker+san实现web服务高可用
- 初识网络爬虫
- Factorial Trailing Zeroes
- 学习kotlin 记录笔记。----数据类型
- Delphi TreeView遍历所有节点问题
- vector::erase() vector中如何删除元素?
- 直接插入排序-java
- 重新设置mysql密码
- 能用foreach遍历访问的对象需要实现____接口或声明____方法的类型
- oc加强day5-NSFileManger、NSPoint与CGPoint等简单结构体、简单数据类型的封装、集合对象的内存管理、copy、单列模式
- 如何找到Tomcat启动时的入口文件
- 深入理解seajs之配置指南
- git push origin master fatal: 'origin' does not appear to be a git repository fatal: Could not read