delphi - txmldocument.xml で encoding = "utf-8"?> を取得するにはどうすればよいですか?

Question

これは、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;

encoding="utf-8"?>結果のドキュメントではまだ取得できません。しかし、私が言うなら

  XMLDoc.Encoding := 'utf-16';

その後encoding="utf-16"?>、結果のドキュメントを取得します。

何か案は？誰？