Einzelnen Beitrag anzeigen

DelphiManiac

Registriert seit: 5. Dez 2005
742 Beiträge
 
#1

4 Bytes als Float betrachten

  Alt 22. Mär 2007, 11:22
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
  Mit Zitat antworten Zitat