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