(Delphi ActiveX) Decode HTML Entities found in XML

Demonstrates how to decode HTML entities found in XML.

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

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
xml: TChilkatXml;
success: Integer;
strDecoded: WideString;

begin
// Load an XML file containing the following:

// <?xml version="1.0" encoding="UTF-8"?>
// <output>Franz&#xf6;sische</output> 

xml := TChilkatXml.Create(Self);
success := xml.LoadXmlFile('qa_data/xml/hasHtmlEntity.xml');

// Get non-decoded content, then get decoded content.

// Result is Franz&#xf6;sische
Memo1.Lines.Add(xml.Content);

// Result is Französische
strDecoded := xml.DecodeEntities(xml.Content);
Memo1.Lines.Add(strDecoded);
end;