XML Eintrag löschen

[Akut-Programming]

Hi!

Ist es möglich eine subNode komplett zu löschen. Also wenn ich z.B. alle gespeicherten Daten zu einem Film, der einer FilmID zugeordnet ist, löschen will, dann will ich ja alle Infos z.B. von FilmID "1" gelöscht haben.

[MathiasSimmack]

Ja, das geht. Falls du Code willst, musst du uns aber mal ein bisschen von deiner XML-Struktur zeigen. So ganz ohne Vorlage wird´s schwer.

[Sanchez]

hallo,

so z.B.

Delphi-Quellcode:

  node :=xmlDoc.selectSingleNode('/werte/eintrag[id="'+itoa(id,0)+'"]');
  parentnode := node.parentNode;
  parentnode.removeChild(node);

grüße, daniel

[Akut-Programming]

Also Mathias, hier is n Stücke aus meiner XML

Code:

<PlanView>
<termin>
  <terminid>1</terminid>
  <terminbez>TestTermin1</terminbez>
  <datum>03.09.2003</datum>
  <uhrzeit>12:00</uhrzeit>
  <bemerkung>versuchmers ma!</bemerkung>
</termin>
<termin>
  <terminid>2</terminid>
  <terminbez>TestTermin2</terminbez>
  <datum>03.09.2003</datum>
  <uhrzeit>12:00</uhrzeit>
  <bemerkung>versuchmers nochma!</bemerkung>
  </termin>
</PlanView>

Reicht dir das?

[Akut-Programming]

Zitat von Sanchez0815:

hallo,
so z.B.

Delphi-Quellcode:

node :=xmlDoc.selectSingleNode('/werte/eintrag[id="'+itoa(id,0)+'"]');
  parentnode := node.parentNode;
  parentnode.removeChild(node);

grüße, daniel

So hab ichs versucht, muss ich noch ne uses eintragen oder so, weil er bei mir meint itoa(id,0) ist kein definierter Bezeichner. Ebenfalls parentnode.

Sorry für die vielleicht dummen fragen. Hab nur grad erst mit XML angefangen.

[Sanchez]

Sorry itoa musst durch StrToInt ersetzen.
Parentnode musst du definieren - gleich wie node

var parentnode, node: IXMLDOMNode; grüße, daniel

[Akut-Programming]

Und "id" in StrToInt wäre dann sozusagen bei mir die terminid, oder??! Da bei mir die Meldung kommt, das id n undefinierter Bezeichner ist.

[Sanchez]

Genau

[Akut-Programming]

Also im Moment würde es so bei mir aussehen. Um XML Einträge zu löschen, habe ich ein Bild eingefügt, welches dann mit einem OnCLick Ereignis belegt ist...

Delphi-Quellcode:

procedure Tfrm_planview_main.Image2Click(Sender: TObject);
var
  node, parentnode: IXMLDOMNode;
  id: integer;
begin
  id:=StrToInt(xmlDoc.selectSingleNode('/PlanView/termin/terminid').text);
  node :=xmlDoc.selectSingleNode('/PlanView/termin[terminid="'+IntToStr(id)+'"]');
  parentnode := node.parentNode;
  parentnode.removeChild(node);
end;

Im Programm selber bekomme ich keine Fehlermeldung, aber das löschen klappt trotzdem nicht

[Sanchez]

Du musst nach dem löschen noch

xmlDoc.save(filename); machen, damit du es in der Datei übernimmst

PS: Gegebenenfalls musst du noch deine Anzeige updaten um die Änderung in deinem Prog sehen zu können