B4X

Example: Crypt2.CrcBd method

Demonstrates how to call the CrcBd method. B4X

Dim crypt As ChilkatCrypt2
crypt.Initialize("crypt")

Dim bd As ChilkatBinData
bd.Initialize
bd.AppendString("123456789", "us-ascii")


Dim crc32 As Long = crypt.CrcBd("crc-32", bd)
'  The decimal value is 3421780262 (converted to hex is 0xCBF43926)
Log(crc32)

Dim crc8 As Long = crypt.CrcBd("crc8", bd)
Log(crc8)