Jak sprawdzić ile plik *.txt ma lini

Hej, {hello}
Jak w temacie.
Czy da się sortować text w pliku bez wczytania go do tablicy.(bezpośrednie operacje na pliku).Jak tak to jak to zrobić?Nie musiał bym wtedy wczytywać pliku do tablicy
(i tak nie mogę bo nie wiem ile plik ma linii).

Mozesz to zrobic wstawiajac na forme komponent memo i:

var ilosc:integer;
begin
memo1.lines.loadfromfile('c:\plik.txt');
ilosc:=memo1.lines.count;
memo1.lines.clear;
end;--Delphi 6, Pascal

----====Pozdrawiam @LL====----
------====== RFL ======------
--==[ [email protected] ]==--

A bez komponentu mozna tak:

var
Txt: TStringList;
begin
Txt:=TStringLis.Create;
Txt.LoadFromFile('C:\Plik.txt');
IloscLinii:=Txt.Count;
Txt.Free;
end;

--sys:> logout....