Schnell Anzahl der Zeilen einer Textfile ermitteln?

[Bernhard Geyer]

Dann solltest Du die Datei Binär durchlaufen

1, Öffnen mit TFileStream
2a, Falls die Datei nicht >> 5 MB wird: Komplett in einen Schwung einlesen
2b, Falls Datei >> 5 MB häbchenweise einlesen, damit Windows nicht das Auslagern von Speicher anfängt
3, Per Speichervergleich nach CRLF-Kombinationen suchen und diese Zählen.

TStringList mach sowas ähnliches, hat jedoch den Nachteil das es noch viel mehr Aktionen durchführt, die du fürs reine Zählen nciht benötigst