Stworzenie prostej struktury XML w Lazarusie

Witam

Muszę zrobić taką strukturę XML w Lazarusie:

<?xml version="1.0"?>
<COMTRADE>
  <CONFIG>
    <STUDENTS>
      <album>000000</album>
      <imie>Jan</imie>
      <nazwisko>Kowalski</nazwisko> 
    </STUDENTS>
    <SIGNALS>
      <ANALOG>
        <CHANEL1/>
        <CHANEL2/>
      </ANALOG>
      <DIGITAL>
        <CHANEL3/>
        <CHANEL4/>
      </DIGITAL>
    </SIGNALS>
  </CONFIG>
</COMTRADE> 

Już długo nad tym siedzę, wynik jest taki:

<?xml version="1.0" encoding="utf-8"?>
<COMTRADE>
  <CONFIG>
    <STUDENTS/>
    <SIGNALS/>
  </CONFIG>
</COMTRADE>

I kombinuję, nie wiem jak to pociągnąć dalej. Potrzebuję podpowiedzi jak podzielić np. <ANALOG>, jeśli to będę wiedział dalej już pójdzie.

Fragment kodu:

    Doc := TXMLDocument.Create;

    // Create a root node
    RootNode := Doc.CreateElement('COMTRADE');
    Doc.Appendchild(RootNode);

    // Create a parent node
    RootNode:= Doc.DocumentElement;
    parentNode := Doc.CreateElement('CONFIG');
    RootNode.Appendchild(parentNode);

    // Create a child node
    parentNode := Doc.CreateElement('STUDENTS');
    RootNode.ChildNodes.Item[0].AppendChild(parentNode);

    // Create a child node
    parentNode := Doc.CreateElement('SIGNALS');
    RootNode.ChildNodes.Item[0].AppendChild(parentNode); 

Pozdrawiam

//Atrybuty w takiej postaci - odgórny wymóg.

http://wiki.freepascal.org/XML_Tutorial#Generating_a_XML_file