Delphi ActiveX

Demonstrate the Global.AutoQBDecode property

The Global.AutoQBDecode property can be set to _TRUE_ to cause Q/B encoded string arguments passed to any Chilkat method to be automatically decoded before being used.

Note: This example requires Chilkat v10.0.0 or later.

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
glob: TChilkatGlobal;
s_cafe: WideString;
s1: TChilkatStringBuilder;
s_hello: WideString;
s2: TChilkatStringBuilder;

begin
// Turn on auto Q/B decoding for all strings passed to any Chilkat method in any Chilkat class.
glob := TChilkatGlobal.Create(Self);
glob.AutoQBDecode := 1;

// ---------------------------------------------------------------------------------------------------------------------------------------------
// "Q" Encoding

// Quoted-Printable encoding is primarily used for text that is mostly ASCII with some non-ASCII characters. 
// It encodes these characters in a way that remains mostly readable and compatible with ASCII-only systems.

// How It Works with UTF-8:
// - ASCII characters (except special characters like `=`) are encoded as themselves.
// - Non-ASCII characters are represented by their UTF-8 byte values, each byte encoded as `=` followed by two hexadecimal digits. 
//   For example, the UTF-8 character "é" (U+00E9) is encoded as `=C3=A9`.

// For example, consider the text "Café" encoded in UTF-8. The UTF-8 bytes for "é" are `C3 A9`, so in Quoted-Printable, it looks like this:  Caf=C3=A9

// The "Q" encoding has this syntax:  "=?charset?q?encoded_text?="
// For example: "=?UTF-8?Q?Caf=C3=A9_announcement?="

// ------
// "B" Encoding

// Base64 encoding is used to encode non-ASCII text, making it more suitable for text with a high density of non-ASCII characters, such as those found in non-Western European languages.

// For example, consider the text "こんにちは" ("Hello" in Japanese).
// The "B" encoded string would be "=?UTF-8?B?44GT44KT44Gr44Gh44Gv?="

// ------
// Q encoding is suitable for text that is mostly ASCII.
// B Encoding is best for text that is densely packed with non-us-ascii chars, such as non-Latin (Asian) languages.
// ---------------------------------------------------------------------------------------------------------------------------------------------

// You can use Chilkat's online tool at Online Binary Encoder to pre-encode your literal strings before
// inserting them into your source code.

// When using the online tool, choose either "MIME header Q Encoding" or "MIME Header B Encoding".

// For example:
s_cafe := '=?utf-8?Q?Caf=C3=A9?=';
s1 := TChilkatStringBuilder.Create(Self);
s1.Append(s_cafe);
Memo1.Lines.Add(s1.GetAsString());
// Output is Café

s_hello := '=?UTF-8?B?44GT44KT44Gr44Gh44Gv?=';
s2 := TChilkatStringBuilder.Create(Self);
s2.Append(s_hello);
Memo1.Lines.Add(s2.GetAsString());
// Output is こんにちは
end;