Schau Dir "FindInString" einmal in Ruhe an:
Zitat:
Delphi-Quellcode:
SetLength(Return, 0);
i := Pos(SearchFrom, Text);
while i > 0 do
Was gibt diese Funktion denn wohl in Return zurück, wenn i 0 ergibt?
[edit] Wie ich gerade sehe, ist das ja sogar eine Boolean-Funktion, die Dir zurückgibt, ob die Länge > 0 ist. Das musst Du dann eben auch auswerten. [/edit]