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;