Suchbegriff als "ganzes Wort" innerhalb eines Textes suchen

[Helmi]

Hallo,

mittels folgendem Code ermittle ich die Anzahl eines Suchbegriffes innerhalb eines Textes.

Delphi-Quellcode:

  Offset  := 1;

  max_Ende := length(Zeile);

  repeat
    akt_Pos := PosEx(SuchText, Zeile, Offset);

    If akt_Pos > 0 then
      begin
        If akt_Pos <= max_Ende then
          inc(Result);

        Offset := akt_Pos + 1;
      end;
  until akt_Pos = 0;
end;

Damit wird aber z. B. der Suchbegriff "und" auch in "Kunde" gefunden.
Wie kann ich eine Suche nach "ganzem Wort" realisieren?
Wichtig ist hierbei, dass alle Vorkommen innerhalb des Textes gezählt werden sollen.