[mozarttt]

//подробно писать не буду, думаю и так поймешь..
type
TMyRecord = record
a1,a2,a3,a4,a5: Integer;

var
MyRec: TMyRecord;
begin
//посылаешь, а читаешь через ReceiveBuf
Socket.SendBuf(MyRec, SizeOf(TMyRec));
end;