Zeilen ohne gesuchten String aus Datei entfernen

[marabu]

Hallo,

wer Zugriff auf die Funktion AnsiContainsText() hat, der kann auch UTF8-Dateien verarbeiten:

Delphi-Quellcode:

begin
  // ...
  while not Eof do
  begin
    ReadLn(line);
    if AnsiContainsText(line, PurgeId) then
      WriteLn(line);
  end;
  // ...
end;

Aber eigentlich ist das eine Aufgabe, die man ohne Gesichtsverlust auf der Shell-Ebene erledigen kann:

Code:

grep 123 input.txt >output.txt

Grüße vom marabu