(DataFlex) 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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoCrypt
    Integer iValue
    Boolean iBLittleEndian
    String s

    Get Create (RefClass(cComChilkatCrypt2)) To hoCrypt
    If (Not(IsComObjectCreated(hoCrypt))) Begin
        Send CreateComObject of hoCrypt
    End

    // 1193046 decimal is equal to 0x123456 hex.
    Move 1193046 To iValue

    // Write the integer in 8 bytes using little-endian byte-order and return as hex
    Move True To iBLittleEndian
    Get ComEncodeInt Of hoCrypt iValue 8 iBLittleEndian "hex" To s
    // The output is: 5634120000000000
    Showln s

    // Now use big-endian...
    Move False To iBLittleEndian
    Get ComEncodeInt Of hoCrypt iValue 8 iBLittleEndian "hex" To s
    // The output is: 0000000000123456
    Showln s

    // Instead of hex, get the 8 bytes using base64.
    Get ComEncodeInt Of hoCrypt iValue 8 iBLittleEndian "base64" To s
    // The output is: AAAAAAASNFY=
    Showln s


End_Procedure