Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Der Reihe nach Buchstaben auswerten (https://www.delphipraxis.net/90348-der-reihe-nach-buchstaben-auswerten.html)

Marcel_Mars 15. Apr 2007 19:29


Der Reihe nach Buchstaben auswerten
 
Hallo zusammen
ich möchte ein Sprachausgabeprogramm erstellen.
Wie kann man jeden Buchstaben einzeln( in einer Schleife) auswerten? Ich hab verschiedenes mit Copy versucht aber ich habe immer nur von vorne die buchstabenkette gekriegt(also zu erst h, ha, hal, hall und dann hallo).
Kann mir jemand mit Code oder Links weiterhelfen?

Danke für eure Antworten

Freundliche Grüsse
Mars

mkinzler 15. Apr 2007 19:32

Re: Der Reihe nach Buchstaben auswerten
 
Delphi-Quellcode:
for i := 0 to Lenhth(s)-1 do
begin
    ... := s[i];
end;

Nikolas 15. Apr 2007 19:33

Re: Der Reihe nach Buchstaben auswerten
 
Ein String ist so etwas wie ein array of char. Du kannst einfach per str:='Hallo'; str1:=str[1] darauf zugreifen.

Daniel B 15. Apr 2007 19:33

Re: Der Reihe nach Buchstaben auswerten
 
Delphi-Quellcode:
    for iFor := 1 to Length(Textstring) do
    begin
      Ergebnisstring := Textstring[iFor];
    end;
HTH

fwsp 15. Apr 2007 19:33

Re: Der Reihe nach Buchstaben auswerten
 
Zitat:

Zitat von mkinzler
Delphi-Quellcode:
for i := 0 to Lenhth(s)-1 do
begin
    ... := s[i];
end;

meine strings fangen immer bei 1 an.
Delphi-Quellcode:
for i := 1 to Length(s) do
begin
    ... := s[i];
end;

mkinzler 15. Apr 2007 19:34

Re: Der Reihe nach Buchstaben auswerten
 
Zitat:

meine strings fangen immer bei 1 an.
Meine auch :oops:

Marcel_Mars 15. Apr 2007 19:45

Re: Der Reihe nach Buchstaben auswerten
 
Das ging aber schnell. Danke viel Mals!! Jetzt gehts.
Mit Freundlichen Grüssen

Mars

mkinzler 15. Apr 2007 19:48

Re: Der Reihe nach Buchstaben auswerten
 
Sleep(), Delay()


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:08 Uhr.

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