А, да, забыл исправить после экспериментов, у меня было
Код:
if (foundFolders.Attr = faDirectory) Then...
Imikle, к сожалению это тоже не решило проблему, папки помеченные "только для чтения" и/или "скрытый" по-прежнему отсекаются и попадают потом в другой список как файлы.