Forum: Algorithmen, Datenstrukturen und Klassendesign
by BigAl,
13. Aug 2022
Hallo Uwe!
As always: Du bist einfach klasse. Manchmal is es so einfach :-)
Ich hab es so gemacht:
if Result.SpecialType in then
Result := Single.NaN;
Forum: Algorithmen, Datenstrukturen und Klassendesign
by BigAl,
13. Aug 2022
Hallo zusammen,
folgendes Problem: Ich erhalte über eine Kommunikation einen Byte-Stream. In diesem Stream sind die verschiedensten Variablentypen enthalten (Words, Single usw.). Das ganze wird dann über Offset-Adressen konvertiert. z.B.:
function GetReal(P: Pointer): Single;
Var
V: array of Byte absolute Result;
begin
V := PByte(NativeInt(P) + 3)^;
V := PByte(NativeInt(P) + 2)^;