(Delphi DLL) Re-Encode (How to convert encodings)

Demonstrates how to convert a string from one encoding to another.

Chilkat for Delphi Downloads Chilkat non-ActiveX DLL for Delphi Chilkat ActiveX DLL for Delphi * The examples here use the non-ActiveX DLL.

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Crypt2;

...

procedure TForm1.Button1Click(Sender: TObject);
var
crypt: HCkCrypt2;
s1: PWideChar;
s2: PWideChar;
b64: PWideChar;
hex: PWideChar;

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

crypt := CkCrypt2_Create();

s1 := 'This is a test / = abc 123';

// The ReEncode method converts a string from one encoding
// to another.
// Valid encodings are "url", "base64", "qp", "hex", "ansi", "modbase64", "base64url", "base32", "base58",
// and any of the encodings listed here:  http://cknotes.com/chilkat-binary-encoding-list

// Use "ansi" for an unencoded ANSI string.

// Encode to URL-encoding:
s2 := CkCrypt2__reEncode(crypt,s1,'ansi','url');
Memo1.Lines.Add(s2);

// Convert from URL-encoding to base64:

b64 := CkCrypt2__reEncode(crypt,s2,'url','base64');
Memo1.Lines.Add(b64);

// Convert from base64 to hex:

hex := CkCrypt2__reEncode(crypt,b64,'base64','hex');
Memo1.Lines.Add(hex);

CkCrypt2_Dispose(crypt);

end;