Einzelnen Beitrag anzeigen

Benutzerbild von glkgereon
glkgereon

Registriert seit: 16. Mär 2004
2.287 Beiträge
 
#1

"nummerierung" bei TStrings

  Alt 17. Mai 2004, 16:45
hi
ich hab eine procedure, in der ist unter anderem folgende schleife drin
die soll das abgleichen von zwei TStrings erledigen

Delphi-Quellcode:
for i:=0 to Data1.Count-1 do
   Begin
   If Data1.IndexOf(Data2.Strings[i])=-1
   Then Data2.Delete(i);
   End;
ich hab mir das so gedacht:
data2 beinhaltet alles, data1 nur teile der daten

er geht jedes element durch
wenn es in data1 nicht enthalten ist (-1) dann soll ers löschen

damit er nicht über den rand läuft, läuft er nur bis data1.count-1

aber es kommt zu der fehlermeldung

"ungültiger index (2)" (oder so ähnlich, jedenfalls die klassische meldung für einen overflow)

wo ist mein denkfehler, oder spinnt mein delphi?

ich weiss nämlich absolut nicht weiter
»Unlösbare Probleme sind in der Regel schwierig...«
  Mit Zitat antworten Zitat