张志峰的博客

水滴石川,积少成多。

导航

Delphi TreeView 设置树全部展开

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

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

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

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

RzTreeView_DWDept.SetFocus;

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

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