如何让treeview的某个节点不可操作！

Question

如何让treeview的某个节点不可操作！

Answer 1

//参考如下代码～～
procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
  TTreeView(Sender).ReadOnly := Node.Index = 0;
end;

Answer 2

ReadOnly是只能读，我想要不可操作！

Answer 3

procedure TFormMenuEdit.TreeViewMenuCollapsing(Sender: TObject;
  Node: TTreeNode; var AllowCollapse: Boolean);
//prevent to collapse the root
//2003.01.10
begin
  if Node.Level=0 then
    AllowCollapse:=false;
end;