in einem Treeview einen bestimten Knoten selektieren

[Sharky]

Hai valon,

auf die Schnelle fällt mir nur ein den Knoten mit diesem Text zu suchen und in zu selektieren:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  ndx : Integer;
begin
  for ndx := 0 to Pred (TreeView1.Items.Count) do
  begin
    if (TreeView1.Items.Item[ndx].Text = 'test') then
    begin
      TreeView1.Items.Item[ndx].Selected := True;
    end;
  end;
  TreeView1.SetFocus;
end;