Zitat von
Christian Seehase:
Moin Kostas,
schau Dir mal TSearchRec.FindData an.
BTW:
(rec.Name[1] <> '.')
ist falsch. Man muss explizit auf <> '.' und <> '..' prüfen, da Verzeichnis- und Dateinamen auch mit einem Punkt beginnen können.
Danke für den Hinweis. Habs wohl übersehen. Das Problem mit dem Dateien >2GB ist damit natürlich nicht gelöst.
Gruß Kostas