Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**himitsu**

zählt von "a" bis "z":

Delphi-Quellcode:

			for i := 1 to Lenght(text) do

  if text[i] < 'z' then text[i] := Chr(Ord(text[i])+1) else text[i] := 'a';

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.184 Beiträge Delphi 12 Athens	#11 Re: Buchstaben weiterzählen 15. Sep 2004, 17:12 zählt von "a" bis "z": markieren Delphi-Quellcode: for i := 1 to Lenght(text) do if text[i] < 'z' then text[i] := Chr(Ord(text[i])+1) else text[i] := 'a'; $2B or not $2B
	Zitat