Einzelnen Beitrag anzeigen

MikeRohsoft

Registriert seit: 29. Mai 2016
4 Beiträge
 
#4

AW: mehrere Datentypen aus byte array erzeugen

  Alt 14. Sep 2016, 17:59
beim nächsten mal probiere ich sowas offensichtliches aus, tut mir leid, läuft exzellent. Vielen Dank
Delphi-Quellcode:
type
  T2Floats = record
    Float1, Float2: single;
  end;
var
  MyBuffer: array[0..7] of byte = (0, 0, $A4, $43, 0, 0, $A4, $43);
  MyRecord: T2Floats absolute MyBuffer;
begin
  Writeln(FloatToStr(MyRecord.Float1), ' ', FloatToStr(MyRecord.Float2));
  Readln();
end.
  Mit Zitat antworten Zitat