Das Problem ist, dass die meisten Eigenschaften alle schreibgeschützt sind.
Du kannst den Inhalt zwar auslesen:
ShowMessage(xmldoc.doctype.xml);
bzw.
Delphi-Quellcode:
ShowMessage(Format('%s = %s',
[xmldoc.doctype.attributes.item[0].Get_nodeName,
xmldoc.doctype.attributes.item[0].Get_nodeValue])
);
Aber jeder Versuch, die Angaben zu ändern, klappt so leider nicht.
Weitere Vorschläge?