Ich möchte hier einmal die Komponente TFileSearcher vorstellen, die ich in Zusammenarbeit mit Delbor geschrieben habe. Diese enthält ein paar erweiterte Features:
- Suche nach mehreren Suchmasken, z.B. *.bmp;*.jpg;*.gif
- Angabe der gewünschten Dateiattribute mit (derzeit 4) verschiedenen Auswertungsoptionen
- Optional rekursive Suche, eine maximale Rekursionstiefe kann angegeben werden
- Nutzung eines Threads, das Hauptprogramm wird also nicht blockiert
- Erweiterte Suchoptionen (Dateigröße, Erstellungsdatum, Datum der letzten Änderung, Datum des letzten Zugriffs) mit jeweils Maximal- und Minimalangaben
Im Archiv ist eine
Unit mit Hilfsklassen bzw. -records enthalten (DDFileUtils.pas), die nicht unmittelbar mit der Komponente zu tun haben, von dieser aber z.T. genutzt werden. Der Code sollte mindestens ab Delphi 5 kompilierbar sein, getestet wurde mit Delphi 7, 2007 und XE. XE 2 wird möglicherweise nicht ohne Änderungen unterstützt (Integer-Typen), aber da ich keine Lizenz besitze, kann ich das nicht mit Sicherheit sagen.
Macht mit dem Ding, was Ihr wollt (Lizenz ist entsprechend)