4 Bytes als Float betrachten

[DelphiManiac]

Hallo,
ich habe folgendes Problem:
ich habe 4 Bytes
Byte1,Byte2,Byte3,Byte4:Byte diese Bytes will ich also Floatzahl bewerten nach IEEE 754.
Denke der Datentyp Single ist schon IEEE 754 konform.
Habe es bisher (aber natürlich nicht sonderlich gut oder elegant) so
gelöst

Delphi-Quellcode:

data1:=IntToHex(device1.FT_In_Buffer[3],2);
data2:=IntToHex(device1.FT_In_Buffer[4],2);
data3:=IntToHex(device1.FT_In_Buffer[5],2);
data4:=IntToHex(device1.FT_In_Buffer[6],2);
ReadValueString:='$'+data1+data2+data3+data4;
data:=StrToInt(ReadValueString);
ReadValueString:= HexStringToStr(ReadValueString);
PointerSingle:=@data;
FLOATWERT:=PointerSingle^;

Desweiteren muss ich ja die Floatzahl auch wieder rückrechnen können.. bzw genau die 4 Bytes, die eine Floatzahl darstellen

Danke, ich hoffe es antworten mir ein paar Spezis