Beim TXMLDocument bzw IXMLDocument kann gibt es das Attribut "Encoding", wo man "UTF-8" einfach reinschreiben kann.
Also einfach
Code:
AXMLDocument.Encoding := 'UTF-8';
Ups, hatte den Link noch nicht angeschaut.
Bei mir scheint das "Encoding" Attribut völlig ausreichend zu sein. Ich weiß jetzt gerade nicht, ob die Delphi-Version vielleicht noch eine Rolle spielen könnte, ich bin auf Delphi 12. Abgesehen davon verwende ich grundsätzlich IXMLDocument anstatt TXMLDocument, aber das sollte eigentlich keinen Unterschied machen.