delphi 选中的展开0级 子级不展开

TreeView1.Selected.Expand(False); //选中的展开0级 子级不展开
TreeView1.Selected.Expand(True); //全部展开




posted @ 2014-08-01 10:49  XE2011  阅读(103)  评论(0)  编辑  收藏  举报