Einzelnen Beitrag anzeigen

omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: Problem mit Funktion - Knoten suchen in XML

  Alt 21. Aug 2008, 08:56
Warum übergibst du den Node? Du benutzt ihn ja gar nicht!

Delphi-Quellcode:
function searchNodes(node : IXMLNode; match : widestring) : IXMLNode;
var
  x : integer;
begin
  result := nil;
  if assigned(node) then
  begin
    if node.HasChildNodes then
    begin
      for x := 0 to node.ChildNodes.Count - 1 do
      begin
      if node.ChildNodes[x].Text = match then
        result := node.ChildNodes[x];
      end;
    end;
  end;
end;
  Mit Zitat antworten Zitat