Volltextsuche mit Delphi

[Sir Rufo]

Also du hast XE7 und du hast System.IOUtils und baust dir tatsächlich die Datei-Suche noch selber und darüberhinaus willst du alles in einer Methode abarbeiten?

Trenn den Mist doch mal voneinander, dann ist das Testen auch erheblich einfacher.

Dann wäre da noch

Delphi-Quellcode:

            slist.LoadFromFile(Path + Rec.Name);
            slist.Text := UTF8Encode(slist.Text);

WÜrde ich ja mal in die Doku TStringList.LoadFromFile schauen und anders schreiben als

Delphi-Quellcode:

// gleich richtig laden
slist-LoadFromFile( Path + Rec.Name, TEncoding.UTF8 );