danke,
aber komisch ist,
das Code oben funktioniert bis auf Achiev..
das Ankreuzen von versteckt oder schreibgeschützt in der Dateieigenschaft macht überhaupt nichts,
nur man muss vor Achiev ankreuzen ..
if (sr.Attr and faAnyFile) = sr.Attr then
das bedeutet doch, dass nur die Dateien nicht die Unterordner gesucht werden oder?