delphi的treeview如何才能禁止点击＋号展开节点？

Question

delphi的treeview如何才能禁止点击＋号展开节点？将
  TreeView1.OnExpanding:=nil;
  TreeView1.OnExpanded:=nil;也是一样会展开节点

Answer 1

不是这样，是在OnExpanding里面将AllowExpansion设置为False

Answer 2

OnExpanding事件中
AllowExpansion := false;

Answer 3

如果有若干个节点，只是想某个节点不能展开，怎么办？
例如
+aaaa
 +1111
 +2222
+bbbb
 +3333
 +4444只想bbbb不能展开
aaaa可以展开OnExpanding事件中
AllowExpansion := false;
这个变成整个tree都不能展开了