(PureBasic) Example: Crypt2.EncodeString method
Demonstrates how to call the EncodeString method.
IncludeFile "CkCrypt2.pb"
Procedure ChilkatExample()
crypt.i = CkCrypt2::ckCreate()
If crypt.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
s.s = "Hello World"
Debug CkCrypt2::ckEncodeString(crypt,s,"utf-8","hex")
; Output: 48656C6C6F20576F726C64
Debug CkCrypt2::ckEncodeString(crypt,s,"utf-16","hex")
; Output: 480065006C006C006F00200057006F0072006C006400
Debug CkCrypt2::ckEncodeString(crypt,s,"utf-8","base64")
; Output: SGVsbG8gV29ybGQ=
s = "électricité"
Debug CkCrypt2::ckEncodeString(crypt,s,"utf-8","hex")
; Output: C3A96C6563747269636974C3A9
Debug CkCrypt2::ckEncodeString(crypt,s,"windows-1252","hex")
; Output: E96C6563747269636974E9
Debug CkCrypt2::ckEncodeString(crypt,s,"windows-1252","hex_lower")
; Output: e96c6563747269636974e9
Debug CkCrypt2::ckEncodeString(crypt,s,"utf-8","url")
; Output: %C3%A9lectricit%C3%A9
CkCrypt2::ckDispose(crypt)
ProcedureReturn
EndProcedure
|