Структура и смещения типов

← →
HarryP (2003-10-27 14:09) [0]

type
Tstruc = record
a1:word;
a2:word;
a3:word;
a4:longword;
.....
end;
var
str: Tsruc;
massiv: array of byte;

допустим massiv содержит
$01,$02,$03,$04,$05,$06,$07,$08,$09,$0A,$0B,$0C,$0D,$0E...
выполняем
str := Tstruc(Pointer(@massiv[0])^);

получаем
str.a1=$0102
str.a2=$0304
str.a3=$0506
str.a4=$090A0B0C а хочется $0708090A

Как сделать?

← →
Reindeer Moss Eater (2003-10-27 14:21) [1]

Либо заполняй память через эту запись, либо packed record

Структура и смещения типов Найти похожие ветки