Sample code for 30+ languages & platforms
Lianja

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.

Chilkat Lianja Downloads

Lianja
llSuccess = .F.

loBd = createobject("CkBinData")

// The hex value of decimal 123456789 is 0x075BCD15
x = 123456789

// Appending little-endian causes bytes to be
// appended in the order 0x15, 0xCD, 0x5B, 0x07
llLittleEndian = .T.
llSuccess = loBd.AppendInt4(x,llLittleEndian)

? loBd.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
llLittleEndian = .F.
loBd.AppendInt4(x,llLittleEndian)

? loBd.GetEncoded("hex")
// bd now contains: 15CD5B07075BCD15

// -------------------------------------------
// Now do the same thing with 16-bit integers
loBd.Clear()

// 1234 decimal = 0x04D2 hex.
x = 1234

llLittleEndian = .T.
loBd.AppendInt2(x,llLittleEndian)

? loBd.GetEncoded("hex")
// Output is: D204

llLittleEndian = .F.
loBd.AppendInt2(x,llLittleEndian)

? loBd.GetEncoded("hex")
// Output is now: D20404D2


release loBd