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?