hi,
du könntest doch auch einfach (wenn du keine liste erzeugen willst) die datei öffnen, und dann dir mit random eine zeilenzahl kreieren lassen.
Delphi-Quellcode:
assignfile ();
[..]
zeilenzahl := random (max_zeilenzahl);
// schleife liest zeile für zeile
for i := 1 to zeilenzahl-1 do readln (t);
// wenn i = zeilenzahl, wird die zeile eingelesen, tataa
readln (t,zeile);
closefile (t);
vll hilft ja das
devnull