Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   XML (https://www.delphipraxis.net/46-xml/)
-   -   Delphi Node löschen (https://www.delphipraxis.net/63749-node-loeschen.html)

Tigermoon 22. Feb 2006 13:51


Node löschen
 
Hallo

ich tu mir etwas schwer
ich möchte eine node mit ihren unternodes löschen
sind immer gefüllt

Delphi-Quellcode:
procedure TFWunsch.ILoeschen1Click(Sender: TObject);
var
auswahl: string;
i:integer;
begin
  Wunsch.FWunsch.LBKonst.ClearSelection;
  auswahl := Wunsch.FWunsch.LBWunschSpiele.Items.Strings[Wunsch.fWunsch.LBWunschSpiele.ItemIndex];
  Wunsch.FWunsch.Lauswahl.Caption := auswahl;

  XML_File := newXMLDocument;
  XML_File.LoadFromFile('Badminton.xml');

  for I := 0 to XML_File.ChildNodes['BADMINTON'].ChildNodes['WUNSCHSPIELE'].ChildNodes.Count - 1 do
  begin
      if(XML_File.ChildNodes['BADMINTON'].ChildNodes['WUNSCHSPIELE'].ChildNodes[i].ChildNodes['NAME'].Text = auswahl)
      then begin
          //// hier
      end;
  end;

end;
ich habe euch schon einige versuche gemacht
awa irgendwie klappt das ned
wo //// hier steht soll der knoten [i] gelöscht werden

danke stephie

Niko 22. Feb 2006 16:18

Re: Node löschen
 
Hi,

ich gehe mal davon aus, dass es nur einen Knoten mit dem Text auswahl geben kann. Wenn nicht, musst du das break weg- und die Schleife rückwärts laufen lassen, sonst überspringst du nach jedem Löschen einen Knoten.

Delphi-Quellcode:
// ...
XML_File.ChildNodes['BADMINTON'].ChildNodes['WUNSCHSPIELE'].ChildNodes.Delete(i);
break;
// ...

Tigermoon 23. Feb 2006 08:04

Re: Node löschen
 
Hi

Warum macht das hier garnichts?
in Auswahl steht der korrekte name drin !!!

Delphi-Quellcode:
  for I := 0 to XML_File.ChildNodes['BADMINTON'].ChildNodes['WUNSCHSPIELE'].ChildNodes.Count - 1 do
  begin
      if(XML_File.ChildNodes['BADMINTON'].ChildNodes['WUNSCHSPIELE'].ChildNodes[i].ChildNodes['NAME'].Text = auswahl)
      then begin
        XML_File.ChildNodes['BADMINTON'].ChildNodes['WUNSCHSPIELE'].ChildNodes.Delete(i);
        LB_fuellen;
        break;
      end;
  end;

Tigermoon 23. Feb 2006 08:55

Re: Node löschen
 
Kann mir hier echt keiner Helfen??? :cry:

Wünsche allen im Forum frohe :party:

Stephie

marabu 23. Feb 2006 12:12

Re: Node löschen
 
Hallo Stephie,

du hast vergessen die dazugehörige XML-Datei zu zeigen. Wenn dein Code kompiliert werden kann, aber nicht das erwartete Ergebnis bringt, dann ist die XML-Datei nötig um den Fehler zu lokalisieren.

Grüße vom marabu


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:47 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz