Discussion :

[da_latifa]

salut tt le monde,
j'ai besoin de supprimer la 1ere ligne d'un fichier texte à partir de delphi, aidez moi s'il vous plait
merci

[ero-sennin]

Salut,

Je te propose ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure TForm1.Button1Click(Sender: TObject);
var
  Fichier:TStringList;
  FichierATraiter:String;
begin
  FichierATraiter:='C:\Test\test.txt';
  Fichier:=TStringList.Create;
  try
    // Chargement du fichier
    Fichier.LoadFromFile(FichierATraiter);
    // Suppression de la première ligne
    Fichier.Delete(0);
    // Sauvegarde de la modification
    Fichier.SaveToFile(FichierATraiter);
  finally
    Fichier.Free;
  end;
end;

A+

[da_latifa]

merci bq ero-sennin , ça a marché