XML-Knoten löschen

[habnefrage]

Hi, ich benutze TXMLDoxument um mit XML Dateien zu arbeiten.

Einlesen, was neues reinschreiben, Daten verändern, klappt alles.
Nun bin ich an dem Punkt angekommen dass ich auch mal einen Knoten löschen muss und stellte zu meinem Erstaunen fest, dass es kein removeChldNode oder sowas gibt.

Wie lösche ich denn einen Knoten???


<sections>
<section name="paul" />
<section name="heinz" />
</sections>


var XMLDoc : TXMLDocument;
begin
XMLDoc := newXMLDocument;
XMLDox.LoadFromFile('meinfile.xml');


//Hier irgendwie einen Knoten "heinz" löschen

XMLDoc.SaveToFile('meinfile.xml');
end;


geht sowas nicht???

mfg

Christian

[marabu]

Hallo Christian,

herzlich willkommen in der Delphi-PRAXiS.

Hier ein Beispiel:

Delphi-Quellcode:

procedure TDemoForm.RemoveButtonClick(Sender: TObject);
var
  eRoot: IXMLDOMElement;
  n, nParent: IXMLDOMNode;
  xPath: string;
begin
  xPath := 'deine xpath expression';
  eRoot := XmlDocument.DocumentElement as IXMLDOMElement;
  n := eRoot.selectSingleNode(xpath);
  nParent := n.parentNode;
  nParent.removeChild(n);
end;

Grüße vom marabu

[habnefrage]

vielen dank, so gehts...