Probleme mit XML Tutorial

[DirkH]

Erstmal vorweg: Ein super Tutorial. *respekt*

Eine genaue Lösung gab es bei diesem Problem noch nicht, oder? Oder hab ich das einfach nciht erlesen können ?
Habe nämlich das gleiche Problem

Delphi-Quellcode:

procedure TMainForm.UpdateList;
  Const
    NAMES: array[0..8] of String = ('name', 'format', 'ton', 'anzmedien', 'bildqualität', 'tonqualität', 'gesamt', 'verliehen', 'comment');
  Var
    movies : IXMLDOMNodeList;
    subNode: IXMLDOMNode;
    i, j : integer;
  begin
    Movielist.Items.Clear;
    MovieList.Items.BeginUpdate;

    movies := xmlDoc.documentElement.selectNodes('movie');
    for i:=0 to movies.length -1 do
      begin
      subNode:=movies.item[i].selectSingleNode('id');
      MovieList.Items.Add;
      Movielist.Items[i].Caption := subNode.text;
      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;
    end;
    movielist.Items.EndUpdate;
  end;

 for j:=0 to length(NAMES)-1 do begin ! "[" erwartet, aber ")" gefunden, ist der Fehler.

Und wenn ich mit der Maus auf dem NAMES bleibe, dann gibt er mir

Code:

prop TStrings.Names: [Index:Integer]: String - classes.pas (518)

als info aus. Kann mir da jemand helfen ? Wäre sehr nett.