Fehlermeldung: Listenindex überschreitet das Maximum(1)

[Aviator]

Woher weißt du, dass in der Liste immer mindestens 7 Einträge vorhanden sind? Wenn du auf abbrechen drückst, könnte es sein, dass schon ein Eintrag in der Liste ist und er dann an der Stelle Edit2.Text:=List[1]; abschmiert.

Setz doch zum Test noch ein List.Clear; hinter dein Create der Liste um sicherzustellen, dass nichts in deiner Liste steht.

Des Weiteren würde ich auf die gewünschte Anzahl an Einträgen prüfen und nicht nur auf > 0. Prüfe, ob mindestens 7 Einträge in der Liste sind, damit beim Auslesen der Liste keine Fehler auftreten.

Edit: Das was JFHeins gesagt hat, kommt natürlich noch dazu. Hab ich total über"lesen".