PureBasic

Example: SecureString.HashVal method

Demonstrates the HashVal method. PureBasic

IncludeFile "CkSecureString.pb"

Procedure ChilkatExample()

    success.i = 0

    str.i = CkSecureString::ckCreate()
    If str.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkSecureString::setCkMaintainHash(str, "sha256")
    CkSecureString::ckAppend(str,"Hello World")

    encodedHash.s = CkSecureString::ckHashVal(str,"base64")
    Debug encodedHash


    CkSecureString::ckDispose(str)


    ProcedureReturn
EndProcedure