Entschlüsselungs-Probleme mit DEC

[Amnon82]

Fisch Sharky,

kannst Du mir ein Beispielcode posten, da ich das mit Streams noch nicht gemacht habe?
Bis jetzt hab ich es temporär so gelöst:

Ich verschlüssele die Zeile und ersetze alle Sonderzeichen #13 und #10 mit ## bzw. **.

edit2.text:=StringReplace(edit2.text, #13, '##', [rfReplaceAll]);
edit2.text:=StringReplace(edit2.text, #10, '**', [rfReplaceAll]);
listbox2.Items.add(edit2.text);

Entschlüsseln dann so:

edit2.text:=StringReplace(edit2.text, '**', #10, [rfReplaceAll]);
edit2.text:=StringReplace(edit2.text, '##', #13, [rfReplaceAll]);
listbox1.Items.add(edit2.text);

... wobei das mit dem Steam die Lösung währe.