kann mir jemand in paar tage das wichitge mit delphi beibrin

[Nuclear-Ping]

Code:

Pseudocode:

Deklariere
  StringVariable
  Zaehler1, Zaehler2

Begin

  StringVariable = 'Irgendein Text'
  Zaehler2 = 0

  Durchlaufe mit Zaehler1 StringVariable von 1 bis Ende
    Wenn StringVariable[Zaehler1] Nicht ' ' Dann Erhoehe Zaehler2

  Ausgabe Zaehler2 ' Buchstaben im Text'

End