Man mag es nicht glauben, aber das einzelzeilenweise Durchlaufen ist eventuell sogar schneller und verbraucht weniger
RAM (ist vorallem bei großen Dateien praktisch), aber da LoadFromFile/SaveToFile nicht optimal arbeiten, ist die Speicherersparnis nur bedingt vorhanden.
Was steht denn in "Suchen" und "Ersetzen" drin? Sind da eventuell Zeilenumgrüche (#13 und/oder #10) enthalten?
Ist "Suchen" wirklich in den Dateien enthalten? (richtig geschrieben und so)
Delphi-Quellcode:
If EDatei.Count >= 1 then
begin
if not AnsiContainsText(EDatei.Text, Suchen) then
ShowMessage('nee, is nich: ' + ListFilesPath[i]);
...
und da du ja keine Delphi-Version angegeben hast (im Post oder
Profil )
Delphi-Quellcode:
If EDatei.Count >= 1 then
begin
if Pos(AnsiUpperCase(Suchen), AnsiUpperCase(EDatei.Text)) = 0 then
ShowMessage('nee, is nich: ' + ListFilesPath[i]);
...