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 ...