SetProperty habe ich nicht gefunden..
habe es jetzt so gelöst:
Delphi-Quellcode:
//select Programs node:
xHTPCNodes := doc.selectSingleNode('//group[@Name="Programs"]').childNodes;
for i := 0 to xHTPCNodes.length - 1 do
begin
if xHTPCNodes.item[i].attributes.getNamedItem('location').text = ProgramList[index].ProgramLocation then
begin
xHTPCNodes := xHTPCNodes.item[i].childNodes;
for j := 0 to xHTPCNodes.length - 1 do
begin
if xHTPCNodes.item[j].nodeName = 'StartDelay' then
begin
xHTPCNodes.item[j].text := IntToStr(Delay);
Break;
end;
end;
end;
end;
Umständlich, aber es geht!