急啊：如何在TreeView中某一条选项上直接修改？

Question

我想要它
　点击TreeView上的某一条选项后，通过一个按钮使这个选项处于编辑状态
　这样就可以直接修改这个选项的Text

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  if treeview1.Selected <> nil then
    treeview1.Selected.EditText;
end;

Answer 2

其实，你单击一个节点，它自己就自动处于编辑状态了（readonly一定要为false）；

Answer 3

这样也可以
procedure TForm1.Button1Click(Sender: TObject);
begin
  if treeview1.Selected <> nil then
    treeview1.Selected.EditText;
end;