Einzelnen Beitrag anzeigen

KetchUp

Registriert seit: 16. Nov 2018
31 Beiträge
 
#50

AW: Elemente aus TStringList in Laufzeit entfernen

  Alt 18. Nov 2018, 21:33
Vielen Dank, jetzt bin ich schon ein großen Schritt weiter. Ich hab jetzt auch das Problem des Absturzes ausgemacht.

Code:
RepetitionCheck:=RandomNumber;
While RepetitionCheck = RandomNumber Do RandomNumber:=random(Vocabulary.Count);
Ich wollte verhindern, dass dieselbe Vokabel zwei mal hintereinander abgefragt wird und hab mir damit ne Endlosschleife gebaut, wenn nur noch eine Vokabel vorhanden ist.

Wie erfahre ich denn jetzt welche die Letzte übrig gebliebene Vokabel ist, nachdem alle anderen zufällig mit .Delete entfernt wurden?

Ich dachte sie müsste den Index 0 haben, das gibt aber ein "out of bounds" zurück.
  Mit Zitat antworten Zitat