soit F un fichier texte déclaré :
f : file of text;
L : string;
Alors, comme chaque ligne peut avoir un longueur variable, il n'y a pas d'autre solution que de parcourir le fichier du début à la fin :
AssignFile(F, 'MonFichier.txt');
Reset(F);
i:=0;
While not Eof(F) do
begin
Readln(F, L);
Inc(i);
end;
CloseFile(F);
I contient alors le nombre de lignes. Mais, je le répète, c'est pour le cas où la longueur des lignes n'est pas connue.
Regardes l'excellent didacticiel sur les fichiers sur le site de
Frédéric BEAULIEU.
May Delphi be with you.
-------------------------------
Réponse au message :
-------------------------------
salut, comment connaître le nombre de ligne dans un fichier txt ?