Dword -> word ?

[Mavarik]

Delphi-Quellcode:

type
  tmr =  packed record
    w1 : word;
    w0 : word;
  end;
var
  mr : Tmr;
  a : cardinal absolute mr;

begin
  a:=$12345678 ;
  memo1.Lines.Add(inttohex(mr.w1,4));
  memo1.Lines.Add(inttohex(mr.w0,4));
end;

Dann aber so...