张志峰的博客

水滴石川，积少成多。

导航

Delphi TreeView 设置树全部展开

Posted on 2011-11-25 13:45  ╰★张志峰★╮  阅读(3208)  评论(0)  编辑  收藏  举报

以前总是循环展开，现在有这个属性，就简单多了

RzTreeView_DWDept.FullExpand;  这样就可以全部 展开了。

还有一个问题，设置节点选中

RzTreeView_DWDept.SetFocus;

if RzTreeView_DWDept.Selected = nil then
      RzTreeView_DWDept.Selected := RzTreeView_DWDept.Items.Item[0];

这个的重点是  RzTreeView_DWDept.SetFocus; 如果当前焦点没有在树上，你怎么设置都不起作用。