Indem du vorher alle Zeilen einliest, welche du nicht willst?
for i := 1 to x-1 do ReadLn(F)
oder
ReadLn(F, TempVar);
Das
Seek für Benärdateien gibt es nunmal nicht für Textdateien, da es z.B. "schwerer" ist
genau einen Zeilenanfang zu treffen.
alternativ: z.B. TStringList