全部展开: Treeview1.Items[0].Expand(true);
全部收缩: Treeview1.Items[0].Collapse(true);
只有最方便的方法
全部收缩: Treeview1.Items[0].Collapse(true);
只有最方便的方法
解决方案 »
- 温文尔雅地关闭连接,到底是什么意思,什么情况下出现,怎样解决,高手请时,低手来学习帮顶之!
- 6年经验的DELPHI程序员的薪水在上海北京深圳应该是多少?
- 想学习一下3层结构的数据库系统,请高手不吝赐教,谢谢~!
- 如何分析接收到的XML报文
- 怎以安装字体!急用!
- 网格问题
- 如何打印输出相关联的两个表的内容?
- SQL问题简单,你肯定会
- VC的非标准参数COM问题
- 有关一个RXDBCtrl.dcu的问题
- 关于DELPHI程序生成安装文件的问题,请大家帮忙!
- 急急急急急!怎样通过程序在 treeview 中指定某一个item[]展开,并且象是被拖动了旁边的滚动条一样将它显示在treeview可见范围的最上面?
全收缩:aTreeView.FullCollapse
作个循环,for i:=0 to treeview1.Items.Count-1 do
.....getnextnode....
有哪位朋友知道这个方法,圆我的心愿???
mynode:TTreeNode;
begin
mynode:=treeview1.Items.GetFirstNode;
while mynode<>nil do
begin
mynode.Expand(true);
mynode:=mynode.getNextSibling;
end;
end;可能是这个吧,上次看了贴子的:]
Delphi有现成的方法嘛,
全展开:aTreeView.FullExpand
全收缩:aTreeView.FullCollapse