Delphi DLL

HTML Encoding

Demonstrates HTML encoding and decoding. Delphi 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;
s: PWideChar;
htmlEncoded: PWideChar;

begin
crypt := CkCrypt2_Create();

s := '< é ü ç Ω Hello & World ✓ >';

htmlEncoded := CkCrypt2__encodeString(crypt,s,'utf-8','html');
Memo1.Lines.Add(htmlEncoded);

// Output:
// < &eacute; &uuml; &ccedil; &ohm; Hello & World &check; >

// To decode:
s := CkCrypt2__decodeString(crypt,htmlEncoded,'utf-8','html');
Memo1.Lines.Add(s);

// Output:
// < é ü ç Ω Hello & World ✓ >

CkCrypt2_Dispose(crypt);

end;