Delphi Geheimsprache - Delphi-PRAXiS

Geheimsprache

Ein Thema von Tidus · begonnen am 23. Nov 2003 · letzter Beitrag vom 24. Nov 2003

Tidus Registriert seit: 24. Sep 2003 Ort: Saarbrücken 24 Beiträge Delphi 6 Personal	#20 Re: Geheimsprache 23. Nov 2003, 19:12 markieren Delphi-Quellcode: begin x := ord(Satz[i]); if (x >= 65) and (x<=122) then begin x := x - 65 ; x := (x+1) mod 58 ; x := x +65 ; Satz2 := satz2 + chr(x); end else Satz2 := satz2 + chr(x); kannst du mir erklären wie das funktioniert, ich verstehe es nämlich nicht [edit=Sharky]Delphi Tags korrigiert. Mfg, Sharky[/edit]
	Zitat