B4X

Append Big-Endian or Little-Endian Integers

Demonstrates how to append integers in big-endian or little-endian byte order to a BinData.

Note: This example requires Chilkat v9.5.0.77 or greater.

B4X

Dim success As Boolean = False

Dim bd As ChilkatBinData
bd.Initialize

'  The hex value of decimal 123456789 is 0x075BCD15
Dim x As Int = 123456789

'  Appending little-endian causes bytes to be
'  appended in the order 0x15, 0xCD, 0x5B, 0x07
Dim littleEndian As Boolean = True
success = bd.AppendInt4(x, littleEndian)

Log(bd.GetEncoded("hex"))
'  Output is: 15CD5B07

'  Now append the same integer in big-endian byte order.
'  Appending bit-endian causes bytes to be
'  appended in the order 0x07, 0x5B, 0xCD, 0x15
littleEndian = False
bd.AppendInt4(x, littleEndian)

Log(bd.GetEncoded("hex"))
'  bd now contains: 15CD5B07075BCD15

'  -------------------------------------------
'  Now do the same thing with 16-bit integers
bd.Clear

'  1234 decimal = 0x04D2 hex.
x = 1234

littleEndian = True
bd.AppendInt2(x, littleEndian)

Log(bd.GetEncoded("hex"))
'  Output is: D204

littleEndian = False
bd.AppendInt2(x, littleEndian)

Log(bd.GetEncoded("hex"))
'  Output is now: D20404D2