Registriert seit: 29. Mai 2016
4 Beiträge
|
AW: mehrere Datentypen aus byte array erzeugen
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.
|
|
Zitat
|