что-то я сегодня конкретно торможу, толи мало поспал, то ли въехать не могу. Вот тут короче пример как создать XML файл:
- Код: Выделить всё
Doc := TXMLDocument.Create;
RootNode := Doc.CreateElement('register');
Doc.Appendchild(RootNode);
// Create a parent node
RootNode:= Doc.DocumentElement;
parentNode := Doc.CreateElement('usuario');
RootNode.Appendchild(parentNode);
// Create a child node
parentNode := Doc.CreateElement('nome');
nofilho := Doc.CreateTextNode('Fernando');
parentNode.Appendchild(nofilho);
RootNode.ChildNodes.Item[0].AppendChild(parentNode);
// Create a child node
parentNode := Doc.CreateElement('idade');
nofilho := Doc.CreateTextNode('32');
parentNode.Appendchild(nofilho);
RootNode.ChildNodes.Item[0].AppendChild(parentNode);
writeXMLFile(Doc, 'test.xml');
На выходе получается вот это:
- Код: Выделить всё
<register>
<usuario>
<nome>Fernando</nome>
<idade>32</idade>
<usuario>
</register>
Как мне убрать элемент <usuario>, что бы в конце вышло вот так:
- Код: Выделить всё
<register>
<nome>Fernando</nome>
<idade>32</idade>
</register>
Благодарен за идеи.