Double aus Bytes erstellen

[sniper_w]

Delphi-Quellcode:

var
  ar: array[0..7]of Byte;
  db: PDouble;
  myDouble: Double;
begin
  db := PDouble(@ar[0]);
  myDouble := db^;
end;

oder über "unions" in c style

Delphi-Quellcode:

type TMultiType = packed record
  case Boolean of
  true: (as_array: array[0..7]of Byte);
  false: (as_double: Double);
end;