Android Question Hex string to Int

[Steve-h]

I can convert int to hex using

    Dim input As Int = 65535
    Dim output As String
    output = Bit.ToHexString(input)
    Log(output)

Please can someone suggest a way of converting back from Hex to string and explain it in a simplistic way so I can understand.

I have tried various examples from the forum using ByteConverter or Bit.ParseInt but without success. Most of my attempts end up with a Java exception, or don't compile.

Presumably it is a two stage process, first converting the string to bits and then to int.

 

[Steve-h]

After puzzling over this for most of the day I have solved it myself. What I didn't find explained in a way I understood was the 16 which relates to the number base you are converting from.

result =Bit.ParseInt("FFFF",16)

 

[MikeSW17]

[B4X] Hex string to number

Bit.ParseInt will fail if the hex string is larger than the maximum positive int. We can instead use the ByteConverter library to do it (B4A, B4J: https://www.b4x.com/android/forum/threads/6787/#content, it is an internal library named iRandomAccessFile in B4i) Sub AppStart (Args() As String)...

www.b4x.com

 

[William Lancee]

You need to modify the above slightly if you want to convert a css hexadecimal color to b4x color int.

Sub test
    Log(xui.Color_Red)
    Dim javaColor As String = "#ff0000"        'red
    
    Dim b4xcolor As String = "ff" & javaColor.SubString(1)    'remove # and add the transparent component
    Log(StringToInt(b4xcolor))
End Sub

Sub StringToInt(Str As String) As Int
    Dim converter As ByteConverter
    Dim ii() As Int = converter.IntsFromBytes(converter.HexToBytes(Str))
    Return ii(0)
End Sub

 

[TILogistic]

test best:

a routine taken from a conversion function I have, check it out.

library ByteConverter

    Dim Number As String = 65535
    Dim BC As ByteConverter
   
    Dim sHexDecimal As String = BC.HexFromBytes(BC.IntsToBytes(Array As Int(Number.As(Int))))
    Log(sHexDecimal)
   
    Dim IntArray() As Int = BC.IntsFromBytes(BC.HexToBytes(sHexDecimal))
    Log(IntArray(0))