Delphi-Quellcode:
procedure löscheZeile(const FileName: String; const DeleteLine: Integer);
var
Lines: TArray<String>;
begin
Lines := TFile.ReadAllLines(FileName);
Delete(Lines, DeleteLine);
TFile.WriteAllLines(FileName, Lines);
end;
Und dann natürlich noch ReadLn und WriteLn, wobei man die eine Zeile überspringt. (nicht speichert)
Diese Beschreibung Deines Vorhabens ist wirr, wie immer.
Klang teilweise so, als wenn in den Tree-Zeilen Dateinamen stehen und man die Dateien löschen will,
drum sagte ich mir "nee, keine Lust das jetzt zu verstehen .... ich geh erstma Mittag essen"