如何在treeview添加事件？

Question

我做了个树型菜单，想在最后的items中加入onclick（）事件，怎么做？

Answer 1

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  //TreeView1.Selected就是被点击的节点
end;————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 2

直接在treeview的onclick中写事件就可以了。
if treeview1.selected<>nil then
begin
  做你想要做的事情就可以了。
end;
如果不加这句话当你点到空白处就有问题了。

Answer 3

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  IF TreeView1.Selected Then
    IF TreeView1.Items[TreeView1.Items.Count-1]=TreeView1.Selected Then //最后一条
end;