String durchsuchen und Wortvorkommen zählen

[Aike]

Das Problem an dem Code ist, dass er nicht abbricht, sobald mein gesuchtes Wort auftaucht.

Wie gesagt:
string: 'Delphi Delphi Praxis Delphi' soll nicht
Delphi: 3x
sondern 2x anzeigen, weil 'Delphi' zwei Mal vor Praxis erscheint.

Und PosEx ist komischerweise ein undefinierter Bezeichner, obwohl ich eine Hilfe dazu aufrufen kann
[edit]Yeah, man muss in die UsesList noch den Eintrag "StrUtils" hinzufügen, dann geht 's [/edit]

Ok, anscheinend war es das doch noch nicht. Es funktioniert noch nicht so richtig. Irgendetwas wird falsch durgezählt.
[Eine Stunde später] Ich hab jetzt noch result:=iCount eingefügt und es scheint zu funktionieren *freu*