RC4 Problem

[fortuneNext]

Hi,
ich habe diesen Thread hier gefunden:
http://www.delphipraxis.net/internal...&highlight=rc4
Und würde mir jetzt vom oberen Code gerne ein paar Zeilen abschauen und versuchen zu verstehen.

Allerdings verstehe ich folgende Codezeile nicht:

Delphi-Quellcode:

with x do
TByteArray(Dest)[S] := TByteArray(Source)[S] xor D[T];

Sie wird schon beim Compilen als Fehler angezeigt:
[Fehler]: Ungültige Typumwandlung

und zwar an der Stelle

TByteArray(Dest)[S] := TByteArray(Source)[|S] xor D[T];

Alles deklarierte ist das:

Delphi-Quellcode:

type
  TRC4Context = record
    D: array[byte] of Byte;
    I,J: byte;
  end;
var
  R,S,T,K:byte;
  U,L,N,Count:integer;
  X:TRC4Context;

Kann mir jemand helfen, indem er mir verrät, was ich falsch gemacht habe?
Danke!

mfg
fortuneNext