|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
Delphi 12 Athens
|
Re: Caesar Schifffre Quellcode interpretieren und weiterhelf
25. Feb 2010, 14:08
Delphi-Quellcode:
// a bekommt den ordinalen Wert des Zeichens
a := Ord(Edit1.Text[c]);
// hier passiert nix
a := a ;
// der ordinalen Wert wird wieder ZURÜCK in ein Zeichen umgewandelt = Anfangswert
Label1.caption := label1.caption + Chr(a);
Und bezüglich Chiffre ist da nichts vorhanden.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
|