Supprimer la derniere ligne d'un txt

bonjour tous et a l'avance merci de votre aide.
Mon probleme est simple j'écris dans un fichier txt sans probleme je l'enregistre je le lis.Mais j'aimerais si possible suprimer la derniere ligne ou la ligne sélèctionné

Bonjour,

Un exemple :

 var Texte : TStrings;
            N : Integer; //Index de la ligne à effacer.

  begin
  if not FileExists('MonFichier.txt') then exit;
  N := 0; //Exemple pour supprimer la 1ère ligne.
  Texte := TStringList.Create;
  Texte.LoadFromFile('MonFichier.txt');
  //Liste.Delete(Liste.Count - 1); // Exemple pour upprimer la dernière ligne.
  if N < Texte.Count then Texte.Delete(N);   // Supprime la ligne[N].
  Texte.SaveToFile('MonFichier.txt');
  Texte.Free;