Zugriffsverletzung beim hinzufügen von Listview einträgen

[DeddyH]

Delphi-Quellcode:

While Not ADOQuery1.Eof do
     begin
        l := ListView1.Items.Add;
        l.Caption := ADOQuery1.FieldByName('Artikel').asString;
        l.SubItems.Add(ADOQuery1.FieldValues['Preis']);
        ADOQuery1.Next;
     end;

With kannst Du hier nicht nehmen.