Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Im Text nach Zeichen suchen und die dann zählen - aber wie? (https://www.delphipraxis.net/72379-im-text-nach-zeichen-suchen-und-die-dann-zaehlen-aber-wie.html)

Klaus01 29. Jun 2006 17:20

Re: Im Text nach Zeichen suchen und die dann zählen - aber w
 
Liste der Anhänge anzeigen (Anzahl: 1)
habe Dir das Struktogramm mal als pdf angehängt.

Grüße
Klaus

-=IOI=- 11. Dez 2006 21:59

Re: Im Text nach Zeichen suchen und die dann zählen - aber w
 
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 11. Dez 2006 22:09

Re: Im Text nach Zeichen suchen und die dann zählen - aber w
 
Als Zählvariable in der FOR-Schleife verwendet Du j.
Dann aber das hier:
Delphi-Quellcode:
if param[i] = ' ' {...}
Imho sollte das hier auch j sein.

-=IOI=- 11. Dez 2006 22:12

Re: Im Text nach Zeichen suchen und die dann zählen - aber w
 
:wall: 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


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:13 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz