Merkwürdiger Fehler bei loadXML

[moelski]

Moin !

Ich habe folgenden Code:

Delphi-Quellcode:

  xmlDoc := CoDOMDocument40.Create;
  xmlDoc.setProperty('NewParser', True);

  if Not FileExists(AppPath + Filename) then begin
    XMLDoc.validateOnParse  := TRUE;
    XMLDoc.async            := FALSE;

    XMLDoc.loadXML('<?xml version="1.0" encoding="UTF-8"?> <SPIeD Dataset/>');
    XMLDoc.save('E:\test123.xml');
  end else                    // "<?xml version='1.0'?>"
    xmlDoc.load(AppPath + Filename);

  if xmlDoc.parseError.errorCode <> 0 then begin
    SiMain.LogError('XML Error ! (See "Error XML Parser" for details.)');
    SiMain.LogText('Error XML Parser',
                   'Error Code : ' + IntToStr(xmlDoc.parseError.errorCode) + #13#10 +
                   'URL        : ' + xmlDoc.parseError.url                 + #13#10 +
                   'Reason     : ' + xmlDoc.parseError.reason              + #13#10 +
                   'SrcText    : ' + xmlDoc.parseError.srcText             + #13#10 +
                   'Line       : ' + IntToStr(xmlDoc.parseError.line));
    MessageDlg('XML Error !!', mtError, [mbOk], 0);
    //Application.Terminate;
  end;

Und wenn ich den ausführe kriege ich immer einen Error Code -1072894427 mit der Reason "Equal expected".

Kann mir jemand mal auf die Rille helfen was ich hier falsch mache?

Nebnbei xmlDoc ist definiert:
XmlDoc : IXmlDomDocument2;

Und die Bib MSXML2_TLB ist importiert und in Uses eingetragen.