Daten reinpacken in Tbytes...

[Sprint]

Delphi-Quellcode:

type
  TMyRecord = packed record
  ...
  end;

Delphi-Quellcode:

type
  TBytes = array of Byte;

Delphi-Quellcode:

var
  MyRec: TMyRecord;
  MyArry: TBytes;
begin

  SetLength(MyArry, SizeOf(TMyRecord));
  Move(MyRec, MyArry[0], SizeOf(TMyRecord));

end;