xor erklärung

[painrestricter]

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?