Delphi ActiveX

Example: Crypt2.EncodeString method

Demonstrates how to call the EncodeString method. Delphi ActiveX

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

...

procedure TForm1.Button1Click(Sender: TObject);
var
crypt: TChilkatCrypt2;
s: WideString;

begin
crypt := TChilkatCrypt2.Create(Self);

s := 'Hello World';

Memo1.Lines.Add(crypt.EncodeString(s,'utf-8','hex'));
// Output: 48656C6C6F20576F726C64

Memo1.Lines.Add(crypt.EncodeString(s,'utf-16','hex'));
// Output: 480065006C006C006F00200057006F0072006C006400

Memo1.Lines.Add(crypt.EncodeString(s,'utf-8','base64'));
// Output: SGVsbG8gV29ybGQ=

s := 'électricité';

Memo1.Lines.Add(crypt.EncodeString(s,'utf-8','hex'));
// Output: C3A96C6563747269636974C3A9

Memo1.Lines.Add(crypt.EncodeString(s,'windows-1252','hex'));
// Output: E96C6563747269636974E9

Memo1.Lines.Add(crypt.EncodeString(s,'windows-1252','hex_lower'));
// Output: e96c6563747269636974e9

Memo1.Lines.Add(crypt.EncodeString(s,'utf-8','url'));
// Output: %C3%A9lectricit%C3%A9
end;