给定一个Node的text的字符串，如何在Treeview中定位这个Node上？

Question

用一个算法去找。
但是，当两个节点的Text相同时，只能找到第一个。当然，也可以指定一个起始点，去找它的Node.function FindNode(TreeView: TTreeView; startnode: TTreeNode; atext: String);
var
  node: TTreeNode;
begin
  Result := nil;
  if startnode = nil then 
     node := TreeView.Items.GetFirst
  else
     node := startnode;
  while node <> nil do begin
    if node.text = atext then begin
      Result := node;
      Break;
    end;
    node := node.GetNext;
  end;  
end;

Answer 1

如何是我刚刚添中进去的，也要这样找？