Delphi DLL

HTML Entity Encode and Decode in StringBuilder

Demonstrates HTML encoding and decoding the contents of a StringBuilder. Delphi DLL

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

...

procedure TForm1.Button1Click(Sender: TObject);
var
sb: HCkStringBuilder;
s: PWideChar;

begin
sb := CkStringBuilder_Create();

s := '< é ü ç Ω Hello & World ✓ >';
CkStringBuilder_Append(sb,s);

CkStringBuilder_Encode(sb,'html','utf-8');
Memo1.Lines.Add(CkStringBuilder__getAsString(sb));

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

// To decode:
CkStringBuilder_Decode(sb,'html','utf-8');
Memo1.Lines.Add(CkStringBuilder__getAsString(sb));

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

CkStringBuilder_Dispose(sb);

end;