German 32-Bit-Gleitpunktzahl

normank

Member
Licensed User
Longtime User
Hallo ihr Lieben, seit enigen Tage habe ich B4A
und möchte gern eine 32-bit-Gletpunktzahl, die als Hex-String vorliegt, in eine Float-Zahl umwandeln.

Ich suche nach einer Sub "ConvertHexToFloat".
Kann nir da jemand bitte helfen?
 

normank

Member
Licensed User
Longtime User
Hallo Frank,
danke damit bin ich weiter gekommen, meine Lösung ist folgende:
B4X:
Sub Process_Globals
   Dim Conv As ByteConverter
End Sub

Sub Globals
End Sub

Sub Activity_Create(FirstTime As Boolean)
   Msgbox(ConvertHexToFloat("C7F12064"),"Floats:")'soll -123456.78 sein
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub ConvertHexToFloat(Hex As String)
   Dim fp(0) As Float
   fp = Conv.FloatsFromBytes(Conv.HexToBytes(Hex))
   Return Round2(fp(0),2)
End Sub
Funktioniert wie gewünsch. Danke für de Tipp !
Norman
 
Last edited:
Top