Delphi TreeView – 自动展开树形结构
当处理完TreeView控件树形结构的数据后，需要默认自动全部展开，可以用到TreeView的Expanded属性。
|
1
2
3
4
5
6
7
8
9
10
|
var icount : integer;beginRzTreeView1.Items.EndUpdate;//示例中用的是Raize中的RzTreeView组件for icount := 0 to RzTreeView1.Items.Count-1 do RzTreeView1.Items[icount].Expanded:=True;RzTreeView1.Items.EndUpdate;end; |
