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*