4 Bytes zu DWORD konvertieren - und umgekehrt

[Olli]

http://de.wikipedia.org/wiki/Byte-Reihenfolge

Delphi-Quellcode:

type
  T4ByteArray:array[1..4] of Byte;
  P4ByteArray:^T4ByteArray;
var
  dwBla: DWORD;
  pBA: P4ByteArray;
  i: Integer;
// ...
begin
  dwBla := 457905529;
  pBA := P4ByteArray(@dwBla);
// ...
  for i := 1 to sizeof(DWORD) do
    Writeln(pBA[i]);
end;

... geht auch umgekehrt (obiges Beispiel arbeitet natürlich mit der Byte-Reihenfolge des aktuellen Prozessors).