Array versendbar?

[Sheak]

Delphi-Quellcode:

type
  CustomRec = record
    Code:Array[0..6] of Integer;
    end;

var
  Brett: TBrett;
  PosX,PosY,PosXX,PosYY,PosXXX,PosYYY,Modus:Integer;
  Rec: CustomRec;


implementation


procedure TBrett.BrettFlaecheMouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
 begin
  Variablen neu definieren;
  Aktualiseren;
  Senden;
 end;

procedure TZeichenbrett.Aktualisieren;
 begin
     Rec.Code[0]:=Modus;
     Rec.Code[1]:=PosX;
     Rec.Code[2]:=PosY;
     Rec.Code[3]:=PosXX;
     Rec.Code[4]:=PosYY;
     Rec.Code[5]:=PosXXX;
     Rec.Code[6]:=PosYYY;
 end;

procedure TZeichenBrett.Senden;
  begin
    ClientSocket1.Socket.SendBuf(Rec,sizeof(Rec));

Hab ja definiert dass der bei jeder Mausbewegung die Arraywerte aktualisert und gesendet werden sollen. Aber er tut es nicht. Hat jemand ne Idee oder einen rettenden Hinweis für mich?