Hallo,
hier etwas Hilfe zur Selbsthilfe: Die Delphi Online Hilfe zeigt dir für die Funktion FindFirst() zwei Dinge - welche Attribute du für die Suche verwenden kannst und wo (
Unit SysUtils) du deren Deklaration findest. Beim Suchen nach Dateien verwendest du $23 als Attribut-Kombination, was soviel wie (faArchive or faHidden or faReadOnly) bedeutet. Welche Änderung du bei den Verzeichnissen noch machen musst, das findest du jetzt bestimmt selbst heraus - oder?
Grüße vom marabu