关于Treeview结点的Text的改变问题

Question

这样就可以if MessageDlg('真的要修改组名吗？',mtConfirmation,[mbYes,mbNo],0)=mrNo then
  S := Node.Text;

Answer 1

不行啊，我点No，组名照样被改了，那个s不是修改后的组名吗？怎么给它赋值呢？Node.Text不能直接赋值吗？该怎么做？

Answer 2

怎么不行啊 你有没有试一下啊 S参数决定修改后的节点文本
procedure TForm1.TreeView1Edited(Sender: TObject; Node: TTreeNode;
  var S: String);
begin
  if MessageDlg('真的要修改组名吗？', mtConfirmation, [mbYes, mbNo], 0) = mrNo then
    S := Node.Text;
end;