Ich finde das heir wesenlich einfacher:
Delphi-Quellcode:
type
Foo = record
case Integer of
0: (arr: array[0..5] of Byte);
1: (
dummy1: Word;
Wert: Cardinal;
);
end;
Dann einfach in Wert deinen Cardinalwert reinschrieben, und du kannst ihn in arr als Bytearray wieder rausholen
