Noch was:
Ich denke wenn du keine dynamischen Arrays (oder Strings, ...) drinnen hast, kannst du auch auf das GetMem verzichten. Ich hoffe mich korrigiert jemand wenn ich mich irre.
Delphi-Quellcode:
procedure SendeKoordinaten(aX,aY: Integer);
var
Msg: TDXPositionsMessage; // kein '^' mehr
begin
Msg.MessageType := DXPOS_MESSAGE; // vorher unter "const" einführen
Msg.X := aX;
Msg.Y := aY;
// ....
{ The message is sent all. }
DXPlay1.SendMessage(DPID_ALLPLAYERS, Msg, MsgSize);
{ The message is sent also to me. }
DXPlay1.SendMessage(DXPlay1.LocalPlayer.ID, Msg, MsgSize);
end;