Im Text nach Zeichen suchen und die dann zählen - aber wie?

[Klaus01]

habe Dir das Struktogramm mal als pdf angehängt.

Grüße
Klaus

[-=IOI=-]

ich suche momentan nach einer möglichkeit wie ich die leerzeichen in einem string zählen kann.

die wohl einfachste variante, die ich auch hier im forum gefunden habe, ist, dass ich jedes zeichen des strings einzeln durchgehe und vergleiche.

leider funktioniert das bei mir nicht.

hier mal etwa code

Delphi-Quellcode:

p:= 0;
for j := 1 to length(param) do
begin
  if param[i] = ' ' then p := p + 1;
end;

p und j sind als integer deklariert, param als string.
es wird auch ohne probleme compiliert.
wenn mein prog, dann aber in die schleife geht bekomm ich eine fehlermeldung "Fehler bei Bereichsprüfung"
(nutze delphi 2005 personal)

ich weiß nicht mehr, was ich noch versuchen soll.

hoffe mir kann jemand von euch helfen

[Martin K]

Als Zählvariable in der FOR-Schleife verwendet Du j.
Dann aber das hier:
if param[i] = ' ' {...} Imho sollte das hier auch j sein.

[-=IOI=-]

also wirklich, wie blind muss man sein, um das zu übersehen. seit ner knappen stunde schlag ich mich jetzt schon damit rum und es ist sowas triviales.

ich dank dir