Einzelnen Beitrag anzeigen

Udontknow

Registriert seit: 17. Jun 2002
223 Beiträge
 
#4

Re: Existiert Knoten in XML Dokument

  Alt 19. Apr 2007, 11:29
Hallo!
Also, ich mach es so:

Delphi-Quellcode:
procedure TForm65.Button1Click(Sender: TObject);
var
  XML:IXMLDocument;
  TemplateNode:IXMLNode;
begin
  if not OpenDialog.Execute then
    exit;

  //Dokument erzeugen
  XML:=NewXMLDocument;
  try
    //Text übergeben
    XML.LoadFromFile(OpenDialog.Filename);

    //XML-Parser aktivieren
    XML.Active:=true;
    try
      if XML.Node.ChildNodes.FindNode('dwfbtemplate')<>NIL then
        ShowMessage('Jau, Knoten da!')
      else
        ShowMessage('Ja, wo ist er denn?')

      
    finally
      XML.Active:=False;

    end;
  finally
    XML:=NIL;
  end;

end;
Bei mir hat er den Knoten gefunden. Ist natürlich ein anderes Interface, aber vielleicht kannst du ja darauf umschwenken.

Edit: uses XMLIntf, XMLDoc...

Cu,
Udontknow
  Mit Zitat antworten Zitat