Dateienlesen und schreiben mit readln und writeln

[F.W.]

Hallöchen wiedermal!

Ich möchte mithilfe von Readln(F: TextFile, S: String) (der so) und so weiter eine Datei bearbeiten.

Einige Werte wurden vorher aus der Datei gelesen, dabei handelt es sich jeweils um komplette Zeilen, alle, die mit "bind" anfangen.
Jetzt wurden diese Werte bearbeitet und sollen wieder in die Datei, die alten bind-Zeilen aber weg!

Ich hab's so probiert:

Delphi-Quellcode:

var
 F: Textfile;
 I: Integer;
 S: String;
begin
   try
 AssignFile(F, FN.Text);
 Reset(F);
 While Eof(F) = False do begin
     Read(F, S);
     if Pos('bind', S) = 1 then // hier wird geprüft, ob die Zeile eine "bind"-Zeile ist
        Writeln; // wenn ja, dann soll diese Zeile gelöscht werden, ich weiß aber nicht wie man das macht
 end;
 for I := 0 to Liste.Items.Count-1 do // am Zeilenende werden die veränderten Werte wieder angefügt
     Writeln(F, 'bind "'+Liste.Items[I].Caption+'" "'+Liste.Items[I].SubItems[0]+'"');

   finally
 CloseFile(F);
   end;
end;

Wie heißt der Befehl zum Zeile Löschen oder wie könnte ich es anders lösen?