(DataFlex) Hash the Contents of a File (SHA256 and other hash algorithms)

Demonstrates how to hash the contents of a file using SHA256, SHA384, SHA512, MD2, MD5, HAVAL, RIPEMD, etc.

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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoCrypt
    Variant hoHashBytes
    Handle hoSb
    Boolean iSuccess
    String sTemp1

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

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

    // Choose the hash algorithm.
    // Can be  "sha1", "sha256", "sha384", "sha512", "md2", "md5", "haval", "ripemd128", "ripemd160","ripemd256", or "ripemd320".
    Set ComHashAlgorithm Of hoCrypt To "sha256"

    Get ComHashFile Of hoCrypt "qa_data/jpg/starfish.jpg" To hoHashBytes

    // Let's examine the hash as a hex string.
    Get Create (RefClass(cComChilkatStringBuilder)) To hoSb
    If (Not(IsComObjectCreated(hoSb))) Begin
        Send CreateComObject of hoSb
    End
    Get ComAppendEncoded Of hoSb vHashBytes "hex" To iSuccess
    Get ComGetAsString Of hoSb To sTemp1
    Showln "SHA256 hash = " sTemp1


End_Procedure