Einzelnen Beitrag anzeigen

Benutzerbild von Andidreas
Andidreas

Registriert seit: 27. Okt 2005
1.110 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#1

Probleme mit XML Verarbeitung(Anzeige / XML Datei speichern)

  Alt 29. Jun 2007, 11:55
aloha zusammen...

ich hab in der tutorial sparte von calganX ein tutorial zur xml programmierung gefunden Link

das habe ich jetzt mal nachprogrammiert... aber an einer stelle komm ich nicht weiter...

in dem tutorial gibt es eine prozedur, in der die daten aus einem xml file in die listview eingelesen werden
sollen... diese prozedur sieht so aus:

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;
beil folgender zeile bringr er mir immer eine fehlermeldung:

      For j := 0 To Length[NAMES] -1 Do er sagt jedes mal das '(' erwartert wurde aber '[' gefunden wurde...
tausch ich die klammer aus wie der compiler es angibt dann kommt die fehlermeldung
'[' erwartet aber '(' gefunden...

hat jemand ne idee was ich da falsch gemacht hab???
Ein Programmierer Programmiert durchschnittlich 15 Code Zeilen pro Tag
Wir sind hier doch nicht bei SAP!!!

Aber wir habens bald
  Mit Zitat antworten Zitat