Es ist ein bekannter Fehler, dass sich das TXMLDocument nicht dynamisch erstellen lässt.
Folgender Code umgeht das Problem:
Delphi-Quellcode:
uses xmldom, XMLIntf, msxmldom, XMLDoc;
...
var XMLDoc: IXMLDocument;
...
{ Create XML document }
XMLDoc:= TXMLDocument.Create(
nil);
{ Assign default values... }
with XMLDoc
do begin
Options:= [doNodeAutoCreate, doNodeAutoIndent,doAttrNull,doAutoPrefix,doNamespaceDecl];
ParseOptions:= [];
NodeIndentStr:= '
';
end;
XMLDoc.Active:= TRUE;
{ Destroy XML document }
XMLDoc:=
nil;
Viel Spaß damit,
Andreas
Andreas N.