Tiene algún tiempo que hice esta búsqueda, pensé que el TTreeView trataba de una estructura de datos en forma de árbol pero resulta que se trata de algo más simple ya que el procedimiento para encontrar un valor se hace de la siguiente forma:

function TForm1.buscarNodo(nom: String):TTreeNode;
var
  aux : TTreeNode;
  i : Integer;
  a : Integer;
  items : Integer
begin
    aux := nil;
    a := 0;
    items := TreeView1.Items.Count;
    for i:=0 to (items - 1) do begin
      if (TreeView1.items[i].Text = nom) then begin
        aux := TreeView1.items[i];
        aux.Selected := True;
        TreeView1.RowSelect := True;
        TreeView1.SetFocus;
        a := 1;
        break;
      end;
    end;

    if a = 1
      then Result := aux
      else Result := nil;

end;

Vía: http://chelinoska.wordpress.com/2010/06/13/busqueda-en-ttreeview/