delphi的treeview如何才能禁止点击＋号展开‘某个’节点

Question

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

Answer 1

那就让那个节点不管干嘛都 Collapes

Answer 2

或者说 treeview点击+号的事件有吗？

Answer 3

if node.text = 'bbb' then
  AllowExpansion := false;

Answer 4

自己找到方法了procedure TForm1.TreeView1Expanding(Sender: TObject; Node: TTreeNode;
  var AllowExpansion: Boolean);
begin
  TreeView1.SetFocus;
  if Node.Text = '学生' then
    AllowExpansion := False;
end;原来有个自带的Node

Answer 5

dd_zhouqian没有看到你写了出来，分给你了