DXPlay Fehler beim record

[Snowi]

Huhu,

ich will per DXPlay einen record versenden, den ich wie folgt deklariert habe:

Delphi-Quellcode:

type
  TSend = record
    DoWhat, What: String;
    From, Extra: Integer;
    x, y: Double;
  end;
...
procedure TPlayer.DoMove(MoveCount: Integer);
var
 Send: ^TSend;
begin
 Send.DoWhat := 'CREATE';
 Send.What := 'CPU';
 Send.From := Form1.PlayerNr;
 Send.Extra := Typ;
 Send.X := x;
 Send.Y := y;
 MsgSize := SizeOf(TSend);
 Form1.net.SendMessage(DPID_ALLPLAYERS, Send, MsgSize); 
end;

Und schon, wenn ich DoWhat einen Wert zuweisen will, schmiert das Programm mit Zugriffsverletzung ab

Kann mir jemand helfen?

[Dax]

Erstmal muss du das machen: New(Send); Oder:Getmem(Send, sizeof(TSend));

[Snowi]

grmpf, Delphi Klasse 12

Getmem(Send, sizeof(TSend)); sagte mir nichts in Beispielen, aber New() ist mit bekannt.

Vielen Dank, es funktioniert