Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
Delphi 7 Enterprise
|
Re: Problem mit Funktion - Knoten suchen in XML
21. Aug 2008, 09: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;
|