Delphi-PRAXiS - Suchbegriff fokussieren

hallo
ich suche mit meinem editfeld ein begriff. der begriff wird momentan noch in einem memo dann angezeigt. wie bekomme ich es hin dass der begriff im memofeld fokussiert wird?

Delphi-Quellcode:

			Procedure SearchWordInArrayAndShow(aWord_Array: TStringArray; aMemoArrayAusgabe : TStrings; Suchwort : String);

var I, LaengeDesSuchwortes : Integer;

    VergleichTextAusArray : String;

Begin

 LaengeDesSuchwortes := Length(Suchwort);

 for I := 0 to Length(aWord_Array)-1 do

   begin

    VergleichTextAusArray := Copy(aWord_Array[I], 1, LaengeDesSuchwortes);

   //Vergleiche das aktuelle ArrayWort mit Suchwort und wenn gefunden, fülle Memo

   if AnsiUppercase(VergleichTextAusArray) = AnsiUppercase(Suchwort) then

    aMemoArrayAusgabe.Add(aWord_Array[I]);

    end;

End;