Einzelnen Beitrag anzeigen

lucius

Registriert seit: 6. Okt 2005
Ort: Niederlande
215 Beiträge
 
Delphi 7 Enterprise
 
#21

Re: KillDuplicates gibt Fehler mit CoolTrayIcon?

  Alt 30. Nov 2005, 11:29
Marabu, list index out of bounds(2)

wobei ich die Anzahl neu definieren muss denke ich mal? dan ist das Problem geloesst, hoffe ich, oder?
Delphi-Quellcode:
try
    sl.LoadFromFile(label2.caption + '\torrents.db');
    //anzahl lesen
    KillDuplicatesEx(sl, 2);
    anzahl:=strtoint(sl[0]); <---- list index out of bounds(2)
    for i:=0 to anzahl do
      begin
        listitem:=listview.Items.add;
        //caption des items lesen
        listitem.Caption := sl[i*2+1];
        //alle subitems des items mit einmal lesen
        listitem.SubItems.CommaText := sl[i*2+2];
      end;
  finally
MFG, Lucius.
  Mit Zitat antworten Zitat