Elemente aus TStringList in Laufzeit entfernen

[KetchUp]

Zitat von Delphi.Narium:

Woher kommt WordCount, das darf maximal Vocabulary.Count - 1 sein.

WordCount wird unter "FormCreate" auf 3 Festgelegt (nur zum testen). Es sind auch genau 3 Vokabeln in der TXT-Datei die im Moment so aussieht:

Code:

black=schwarz
red=rot
blue=blau

In FormCreat steht noch folgendes damit die erste Vokabel sofort bei Programmstart angezeigt wird:

Code:

 WordCount:= 3;
 RandomNumber:= random(WordCount);                    

    try
      Vocabulary:= TStringList.Create;                  
      Vocabulary.LoadFromFile('Vocabulary.txt');        

      L_UnknownWord.Caption:= Vocabulary.ValueFromIndex[RandomNumber];
      L_CorrectAnswer.Caption:= '';

      finally
      Vocabulary.Free;
    end

Zitat von Delphi.Narium:

Wenn Du aber erst eine Zufallszahl im Bereich bis WordCount "würfelst", aber WordCount zufällig größer als Vocabulary.Count - 1 ist, kann es sporadisch Fehler geben.

Der Fehler tritt IMMER auf. Das ist ja das Komische.

Zitat von Delphi.Narium:

Die Vokabeln für jede einzelne Abfrage neu zu laden, halte ich nicht für so eine besonders gute Idee.

Jap, das hab ich mir auch gedacht, ist aber im Moment die einzige Möglichkeit das Programm zum Laufen zu bekommen

[DieDolly]

gelöscht

[KetchUp]

[QUOTE=DieDolly;1418306]

Zitat:

Beispielhaft das Record

Delphi-Quellcode:

TVocab = record
 German, English: string;
end;

Beim Laden des Programms erzeugst du für jede Vokabel ein Record und packst sie alle in eine Liste.

Danke für den Tipp, ich hab zwar keine Ahnung von Records, werde mich aber jetzt mal einlesen.

[DieDolly]

Es wird sich lohnen. Das sage ich immer wieder.
Am besten gleich richtig machen denn sonst wirst du deinen Code später hassen.

Stell dir ein Record vor wie eine Kiste für Schrauben. In der Kiste gibt es Fächer für jede Schraubenart. Deine Kiste heißt TVocab (wovon du eine "Instanz" erstellst die dann in die Liste [die Liste ist dein Schrank wo all die Kisten drin sind] kommt) in deine Kiste kann zwei Arten von Schrauben fassen: Deutsche und Englische. Das sind natürlich Strings.

http://www.delphibasics.co.uk/Article.asp?Name=Records
https://stackoverflow.com/questions/...ist-of-records

[KetchUp]

Funktioniert das noch mit der TStringList? Denn ich muss die Vokabeln während der Laufzeit entfernen können und jeder Vokabel eine Variable zuordnen können um zu überprüfen, wie oft sie schon richtig eingegeben wurde.

[DieDolly]

gelöscht

[DieDolly]

Heute will ich mal nett sein. Hier ein Beispiel mit generischer TList und Klasseninstanzen.
Gelöscht weil der TE sich nur für deine StringListe interessiert