Per ReadLn() zufällige Zeile aus Textdatei lesen

[Jelly]

Hi Devnull,

Zitat von devnull:

zeilenzahl := random (max_zeilenzahl);

Wo dann das Problem, wie du max_zeilenzahl ermitteln willst, ohne vorher alles in den Speicher zu lesen oder sonstwie die CR zu zählen. Deshalb würd ich auch die Datei mittels einer TStringlist komplett einlesen und anschliessend mit StringList[random(Stringlist.count)] in eine Zeile springen.

Gruss,
Tom