Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - string in einem memo-feld finden


huuuuuh - Sa 23.02.08 00:55
Titel: string in einem memo-feld finden
ich suche eine funktion mit der ich in einem memo-feld einen string suchen kann und die zeilennummer zurückbekomme. kann mir da einer helfen?


Blackheart666 - Sa 23.02.08 01:28

Lines, Pos


huuuuuh - Sa 23.02.08 06:55


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
function searchforstring (search : string ): integer;
Var
  Idx: Integer;
Begin
  For Idx := 0 To memo1.lines .Count Do
    If Pos (Search, memo1.lines [Idx]) > 0 Then result:=idx;

End;



ok danke dir :D