Probleme mit XML Tutorial

[CalganX]

Hi,
danke für das Lob.

Ja, das ist ein Fehler im Tutorial, aber derzeit komme ich nicht dazu das zu ändern.
Du musst folgende Schleife:

Delphi-Quellcode:

      with Movielist.Items[i].SubItems do begin
          for j:=0 to length(NAMES)-1 do begin
            subNode := movies.item[i].selectSingleNode(Names[j]);
            if subNode <> nil then
              Add(subNode.text)
            else
              Add('');
            end;
        end;

komplett ersetzen durch:

Delphi-Quellcode:

        for j:=0 to length(NAMES)-1 do begin
          subNode := movies.item[i].selectSingleNode(Names[j]);
          if subNode <> nil then
            Movielist.Items[i].SubItems.Add(subNode.text)
          else
            Movielist.Items[i].SubItems.Add('');
          end;
        end;

Chris