How do I get encoding = "utf-8"?> in a txmldocument.xml?

delphi txmldocument
Freddie Bell picture Freddie Bell · Oct 24, 2013 · Viewed 8.9k times · Source

This doesn't work for me in Delphi XE2.

Var
  XMLDoc : IXMLDOCUMENT;
begin
  XMLDoc := NewXMLDocument;
  XMLDoc.Active := True;
  XMLDoc.Version := '1.0';
  XMLDoc.Encoding := 'utf-8';
  XMLDoc.Options := [doNodeAutoIndent];
  Memo1.Text := XMLDoc.XML.Text;

I still do NOT get the encoding="utf-8"?> in the resulting doc. But if I say 

  XMLDoc.Encoding := 'utf-16';

then it I do get encoding="utf-16"?> in the resulting doc.

Any ideas? Anyone?

Answer

Remy Lebeau picture Remy Lebeau · Oct 24, 2013

UTF-8 is XML's default encoding when no encoding attribute or BOM are present to indicate a different encoding is being used. The underlying XML engine knows that, so it will omit generating an encoding attribute for UTF-8 when it knows it is safe to do so.

AFAIK, there is no way to force IXMLDocument.XML.Text or IXMLDocument.SaveToXML(var XML: DOMString) or IXMLDocument.SaveToXML(var XML: WideString) to generate an encoding attribute for UTF-8. However, IXMLDocument.SaveToXML(var XML: UTF8String) and IXMLDocument.SaveToStream() do generate an encoding attribute for UTF-8.

Related questions

XML parsing, TXMLDocument

I have a problem with parsing XML. How to get field values se_url and phrase? I need to get link1_1, link1_2, key1, link2_1, link2_2, key2... which are in se_url and phrase. I did not find in Google how …

Read More
Delphi - XML - childnodes - getting attributes

I am trying to get the correct data from a twitter atom/xml feed. I have the twitter data in a txmldocument and am trying to get some specific information from it. Here is a truncated example of the data: &…

Read More
Issue building an XML document using TXMLDocument

I'm new to delphi and now I have to read create an xml. my code is the following: function foo.createXMLDocument(): TXMLDocument; var res: TXMLDocument; rootNode: IXMLNode; sl : TStringList; begin res := TXMLDocument.Create(nil); res.Active := true; rootNode := res.AddChild(…

Read More