ah ok danke, denk das hab ich soweit verstanden
muss auch nicht so sicher sein, wird eh noch anderweitig verschlüsselt und ist vorerst mal nur zum test.
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var i : integer;
begin
if memo1.Text <> '' then
text := memo1.text;
try
for i := 1 to length(text) do
text[i] := char(22 XOR Ord(text[i]));
except
...
else ..
Error: der linken seite kann nichts zugewiesen werden
was hab ich falsch gemacht?