Hi,
ich habe gerade Hangman programmiert und habe jetzt eine Editor-Datei (woerterbuch.txt) mit 1000 Wörtern. Die Wörter stehen untereinander und sind mit Return getrennt.
Jetzt will ich zum Beispiel das 154. Wort aus der Liste aufrufen und in die Variable Suchwort speichern.
Wie mache ich das?
Delphi-Quelltext
1: 2: 3: 4: 5: 6:
| procedure woerterliste; var liste : Tstrings; begin liste := Tstringlist.create ; liste.loadfromfile('woerterliste'); end; |
Ich dachte zuerst schreibe ich eine Prozedur in der ich das Wörterbuch aufrufe. Wie kann ich jetzt ein beliebiges Wort aus der Datei entnehmen und der Variable Suchwort speichern?
Viele Dank
Thorsten
Moderiert von
Christian S.: Code- durch Delphi-Tags ersetzt