Einzelnen Beitrag anzeigen

Real-TTX

Registriert seit: 7. Mai 2008
Ort: Stuttgart / Wertheim
136 Beiträge
 
Delphi 2007 Enterprise
 
#1

XML - ChildNode - Exist? (Wert "Exist"?)

  Alt 24. Mai 2008, 13:59
Hallo,

Ich habe mir einige Funktion für mein Programm im Bezug auf XML geschrieben.

Nun habe ich das Problem, ich würde gerne Prüfen, ob eine ChildNode Existiert. Ist das Möglich?
Dabei soll ich festlegen können in welchem "Level" Sie zb Exisitert....

Hier meine Funktion ohne diese Abfrage (Sehr sehr wage) :

Delphi-Quellcode:
function XMLDBDeleteGroup(XMLFile: IXMLDocument; GrpName: string) : boolean;
var
    i: integer;
begin
  result := FALSE;
  for i := 0 to (XMLFile.ChildNodes[XMLDB_MAIN_CHILD].ChildNodes.Count-1) do
  begin
    if (XMLFile.ChildNodes[XMLDB_MAIN_CHILD].ChildNodes[i].ChildNodes['name'].Text = GrpName) then
    begin
      XMLFile.ChildNodes[XMLDB_MAIN_CHILD].ChildNodes.Delete(i);
      result := TRUE;
      Exit;
    end;
  end;
end;
Lieben Gruß, Real-TTX
  Mit Zitat antworten Zitat