MXXMLWriter und Delphi

[mc_adams]

Hallo Leidensgenossen

Ich möchte ein Funktion schreiben, die mir eine XML Struktur erzeugt. Nach längerem Studium der MSDN habe ich mich für den MXXMLWriter (MSXML 4.0) entschieden. Leider bricht meine Funktion schon beim Anlegen des erstens Knoten (startElement) mit der Exception "Falscher Parameter" ab.

Ich hoffe mir kann jemand helfen.

Hier mein Code:

function CreateTestXmlAsText: Widestring;
var
Name: Widestring;
NoValue: Widestring;
Writer: IMXWriter;
Attributes: IMXAttributes;
ContentHandler: IVBSAXContentHandler;
begin
Writer := CoMXXMLWriter40.Create;
Writer.byteOrderMark := True;
Writer.omitXMLDeclaration := False;
Writer.indent := True;
Writer.encoding := 'UTF-8';

ContentHandler := Writer as IVBSAXContentHandler;
Attributes := CoSAXAttributes.Create;

ContentHandler.startDocument;

Name := 'TestNode';
ContentHandler.startElement(NoValue, NoValue, Name, Attributes as IVBSAXAttributes);
ContentHandler.endElement(NoValue, NoValue, Name);

ContentHandler.endDocument;

Result := Writer.output;
end;

Schon mal Danke im voraus.