[MoS]

Сообщение от Bargest

Код:

FindFirst(Dir+'*.*',faAnyFile,SR); 

А папки-то у тебя под эту маску попадают?

Папка = Dir.
допустим Dir:='d:\'; -> следовательно нужно найти все файлы на диске D