Récupérer les dernieres lignes d'un fichier texte

Réponse acceptée !
tu as plusieurs solution soit utiliser la méthode addobject;
soit utiliser une TList que est une liste de pointeurs ce qui dans ton cas n'est pas une difficulté puisque tu utilise une liste chainé je te donne l'exemple delphi
type
  PMyList = ^AList;
  AList = record
   champ1: string;
    champ2: string;
  end;

var

  MyList: TList;
  ARecord: PMyList;
  B: Byte;
  Y: Word;
 comme pour le Tstringlist :  MyList := TList.Create;
while not EOF(F) do
begin
    New(ARecord);
//la tu charges l'enregistrement  à partir du fichier
    MyList.Add(ARecord); {Ajoute l'enregistrement à la liste}
end;
 ensuite tu peux l'utiliser comme précédemment
var buffer:string;
for i:=Mylist.count-21 to Mylist.count-1 do
begin
    Arecord:=Mylist.items[i];
    buffer:=Arecord^.champ1; par exemple
//    la tu mets ton traitement
end;
pour libérer la liste:
   for B := 0 to (MyList.Count - 1) do

   begin
     ARecord := MyList.Items[B];
     Dispose(ARecord);
   end;
   MyList.Free;

comme tu peux le constater c'est une version évoluée des listes chainées

@+
jlen