XML Datei schreiben

[Alex_ITA01]

danke für den Tip mit dem createtextnode...
mein Source sieht wie folgt aus:

Delphi-Quellcode:

procedure TForm1.CreateXML;
var
  xmldoc  : IXMLDOMDocument2;
  root    : IXMLDOMNode;
  elem    : IXMLDOMNode;
  Leer    : IXMLDOMNode;
begin
  xmldoc := CoDOMDocument40.Create;

  xmldoc.loadXML('<Messages></Messages>');
  if xmldoc.documentElement.nodeName <> 'Messages' then Exit;

  xmldoc.createTextNode(#13#10);

  root := xmldoc.createElement('Message01');    // neues Element erstellen <- in dem Fall Root element

  elem := xmldoc.createElement('BOSS');         // neues Element erstellen
  elem.text := 'DU';
  Root.appendChild(elem);                       // Element in RootElement hängen

  xmldoc.documentElement.appendChild(Root);

  xmldoc.save('C:\test.xml');
end;

Nur wie mache ich das mit dem CreateTextNode?
Kann mir da bitte jemand helfen??
Danke
Alex