Delphi TreeView – 自动展开树形结构

Delphi TreeView – 自动展开树形结构

当处理完TreeView控件树形结构的数据后，需要默认自动全部展开，可以用到TreeView的Expanded属性。

1
2
3
4
5
6
7
8
9
10
var
      icount : integer;
begin
RzTreeView1.Items.EndUpdate;
//示例中用的是Raize中的RzTreeView组件
for icount := 0 to RzTreeView1.Items.Count-1 do
      RzTreeView1.Items[icount].Expanded:=True;
 
RzTreeView1.Items.EndUpdate;
end;

recommand

 

Delphi TreeView自动展开

 


 

【推广】 免费学中医，健康全家人
原文地址：https://www.cnblogs.com/karkash/p/6609914.html