Gerar Arquivo XML com TXMLDocument

Alguém poderia me ajudar com uma rotina para gerar arquivos .xml.

Fucei um mente aqui no fórum e net em geral, mas não consegui nada de um exemplo que clareasse .

Me parece muito simples, mas não consigo fazer funcionar.

Seria algo assim: (claro que é mais complexo. O exemplo é só para ter uma idéia):

<cabeçalho>
<Primeiro_Noh>
<Sub_Primeiro_Noh>texto do primeiro sub nó </Sub_Primeiro_Noh>
<Primeiro_Noh>

<Sgundo_Noh>
<Sub_Segundo_Noh>texto do segundo sub nó </Sub_Segundo_Noh>
</Segundo_Noh>
</cabeçalho>

Obs.: não quero (não posso) fazer como se fosse um txto e nem usando o wizard Data Binding. Tem que ser com o componente XML do Delphi mesmo.

Obrigado