delphi 树节点的编辑

[qq_15112959]

我想编辑一棵树的节点的内容，通过点击一个按钮然后树节点那边出现可编辑状态，请问怎么实现

[lyhoo163]

var NowNode,NewNode : TTreeNode;
begin
  TreeView1.SetFocus;
  NowNode := TreeView1.Selected;

1、编辑节点： NowNode.Text:'新的节点显示字符串'; 2、加入节点： NewNode := TreeView1.Items.Add(NowNode,TipS); // 加入结点 3、加入子节点： NewNode := TreeView1.Items.AddChild(NowNode,TipS); // 加入子结点 4：删除节点： NowNode.Delete;

[qq_15112959]

引用 1 楼 lyhoo163 的回复:

var NowNode,NewNode : TTreeNode;
begin
  TreeView1.SetFocus;
  NowNode := TreeView1.Selected;

1、编辑节点： NowNode.Text:'新的节点显示字符串'; 2、加入节点： NewNode := TreeView1.Items.Add(NowNode,TipS); // 加入结点 3、加入子节点： NewNode := TreeView1.Items.AddChild(NowNode,TipS); // 加入子结点 4：删除节点： NowNode.Delete;

我的意思是通过点击某个按钮，然后在我选的树的节点上显示出可以编辑的状态，既可以直接修改该节点的内容

[lyhoo163]

procedure TMID_1_Frm.Button9Click(Sender: TObject);
var NowNode : TTreeNode;
begin
  TreeView1.SetFocus;
  NowNode := TreeView1.Selected;
  NowNode.EditText
end;

1、鼠标选择一节点； 2、再按此按钮，进入节点的编辑状态。

[doloopcn]

引用 4 楼 lyhoo163 的回复:

procedure TMID_1_Frm.Button9Click(Sender: TObject);
var NowNode : TTreeNode;
begin
  TreeView1.SetFocus;
  NowNode := TreeView1.Selected;
  NowNode.EditText
end;

1、鼠标选择一节点； 2、再按此按钮，进入节点的编辑状态。

[qq_15112959]

OK了，谢谢，前面我也调用了该函数，但是貌似不行，后面我单独试一下是可以，应该是跟后面的代码有冲突。

[qq_15112959]

再问一个问题，节点编辑结束的标志是Endedit吗

[qq_15112959]

我怎么知道他已经编辑结束了

[doloopcn]

treeview1.Items.GetFirstNode.EditText 调用Node.EditText函数就可以了