(Visual FoxPro) Encode Integer to Hex or Base64 using N Bytes

Demonstrates how to write an integer to N bytes (little-endian or big-endian) and return the bytes in any encoding such as hex, base64, etc.

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

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loCrypt
LOCAL lnValue
LOCAL lnBLittleEndian
LOCAL s

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Crypt2')
loCrypt = CreateObject('Chilkat.Crypt2')

* 1193046 decimal is equal to 0x123456 hex.
lnValue = 1193046

* Write the integer in 8 bytes using little-endian byte-order and return as hex
lnBLittleEndian = 1
s = loCrypt.EncodeInt(lnValue,8,lnBLittleEndian,"hex")
* The output is: 5634120000000000
? s

* Now use big-endian...
lnBLittleEndian = 0
s = loCrypt.EncodeInt(lnValue,8,lnBLittleEndian,"hex")
* The output is: 0000000000123456
? s

* Instead of hex, get the 8 bytes using base64.
s = loCrypt.EncodeInt(lnValue,8,lnBLittleEndian,"base64")
* The output is: AAAAAAASNFY=
? s

RELEASE loCrypt