zaznaczenie wyszukanego wiersza w stringgrid

Witam.

Potrzebuję pomocy. Chciałbym aby po znalezieniu danego ciągu znaków w liście jednokierunkowej (w tym przypadku w 'kolumnie' surname) procedurka skoczyła automatycznie do wiersza (w stringgridzie) zawierającego ten ciąg. W tej chwili wyświetla na stringgridzie wiersze w których znaleziono dany string. Próbowałem help wbudowany w kompilator i nic nie znalazłem. Chodzi mi o coś typu *Stringgrid1.focus.znaleziony_wiersz * czy Stringgrid1.goto.znaleziony wiersz

 
procedure TForm1.Button5Click(Sender: TObject);
  var
  temp:PElement;
  i : integer;
  n: string;
  nowy:PElement;

begin
search.form4.showmodal;

   i:=1;
   temp:=firstItem;
   clear;
   n:= search.kryterium;

while temp <>nil do
  begin


    if AnsiContainsText(temp.Surname, n)
    then
    begin
    //showmessage('znalazlem');

    //itemlist.showsearch(StringGrid1,temp,i);

    temp:=temp.Next;
    inc(i);

    StringGrid1.FixedRows:=1;
    StringGrid1.FixedCols:=0;
    StringGrid1.RowCount:=i;
    end else temp:=temp.Next;

  end;


end;

var R:TGridRect;
R.Left:=0;
R.Top:=i;
R.Right:=StringGrid1.ColCount-1;
R.Bottom:=i;
StringGrid1.Selection:=R;

dzięki za odp, w sumie teraz dopiero wpadłem na to dlaczego nie działało proste

StringGrid1.Row:=i;

nie wywaliłem polecenia clear; ....