Anzahl der Zeilen in einer Text Datei???

[Christian18]

Hallo,

wie bekomme ich raus wieviel Zeilen in einer Txt Datei drinn sind???

[Wuaegner]

Servus Christian.
Meine Idee:

Code:

 .
                   .
                   .
                   while not Eof do begin
                   readln(File); inc(Zeile);
                   end;

Grüße Flo