Fórum gerar xml #293335

boa tarde!
Estou precisando gerar um arquivo xml, a partir de um resultado do select, como poderia montar isso usando delphi 7 :

<XML>
<CAMPO1> VALOR </CAMPO1>
<CAMPO2> VALOR </CAMPO2>
<ATENDIMENTO>
<CAMPO1> VALOR </CAMPO1>
<CAMPO2> VALOR </CAMPO2>
<CAMPO3> VALOR </CAMPO3>
</ATENDIMENTO>
<ATENDIMENTO>
<CAMPO1> VALOR </CAMPO1>
<CAMPO2> VALOR </CAMPO2>
<CAMPO3> VALOR </CAMPO3>
</ATENDIMENTO>


</XML>

obrigado