Wie Dateizeiger auf bestimmte Position in Textdatei setzen?

[himitsu]

Random für den "Zufall"

und dann einfach die Zeile auslesen und dort eintragen


also z.B.

Delphi-Quellcode:

AssignFile(F, 'MeineDatei.txt');
Reset(F);
For i := 0 to Random(10) do
  ReadLn(F, S);
Close(F);
Edit1.Text := S;

> Random(10) für 1. bis 10. Zeile

Du kannst aber auch die Datei in ein TStringList einlesen (LoadFromFile) und dann die gewünschte Zeile dort auswählen,

oder ...