Zitat von
BaerndH:
ohne es probiert zu haben:
Delphi-Quellcode:
orginal:=Edt_Eingabe.Text;
code := '';
For i:=1 To length (original)
DO code := code + chr(ord(orginal[i])+3);
Edt_Ausgabe.Text:=code;
weil:
a.) code nicht initialisiert war
b.) die Länge von code daher undefiniert war
Außerdem: code wird nicht wirklich benötigt. Kannst direkt in Edt_Ausgabe.Text schreiben.
Ah, vielen Dank an euch alle :> funktioniert nun.
- Nächster Schritt:
: Werde Versuchen die Verschlüsslung auszubauen.
Danke, werd nun closen :>
//edit: anscheinden kann man selbst nicht closen ?
Werde einen Moderator bescheid geben :>
bb. silent-ace