German 32-Bit-Gleitpunktzahl

[normank]

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?

 

[Watchkido1]

Hex to Float

Hi

Damit müsste es gehen.

 

[normank]

Hallo Frank,
danke damit bin ich weiter gekommen, meine Lösung ist folgende:

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