problem med xml

Hej

Jeg har arbejdet lidt på at kunne tilføje til en xml fil, men det lykkeds ikke helt...

Her er koden:

XMLDoc.FileName := 'test.xml';
XMLDoc.Active:=True;

StartItemNode := XMLDoc.ChildNodes.Nodes[0].ChildNodes.First;

  ANode := StartItemNode;
  anode.ChildNodes.Nodes[0].AddChild('word');
  ANode.ChildNodes.Nodes[0].ChildNodes.Nodes[0].Text := 'hej';
  XMLDoc.ChildNodes.Nodes[1].ChildNodes.add(ANode);
  xmldoc.SaveToFile;
  newword.clear;

Xml filen der sådan her ud:

  <?xml version="1.0" encoding="ISO-8859-1" ?>
- <rss version="0.91">
- <words>
  <word>bøh</word>
  </words>
  </rss>

Det jeg så gerne vil er at tilføje en
<word>hej</word>
til xml filen, men det vil den ikke.

Når jeg udføre den kommando jeg har lavet, tilføjer den bare et <word/> lige bagefter 'bøh', så det kommer til at se sådan her ud:

<word>bøh<word/></word>

Den skal jo tilføje en ny word sektion... Hvordan får jeg det til at virke?