Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Список папок/файлов [D7, WinXP]


dkDimon ©   (2004-10-14 21:50:00) 

Добрый день, господа... Столкнулся с такой проблемой. Написал рекурсивную процедуру получения всех папок диска с помощь FindFirst/FindNext/FindClose... Ставлю атрибут faAnyFile в FindFirst, но все равно не попадают папки, у которых стоит какой-либо атрибут RO, H, S, A... Как собственно получать список ВСЕХ папок (Shell's Namespace не предлагать)...


dkDimon   (2004-10-14 22:31:00) [1]

Ааа... все. разобрался... баг небольшой был с флагами


dkDimon   (2004-10-14 22:27:00) [2]

Хм... странно. А у меня не отображает даже папки с RO...


GuAV   (2004-10-14 22:15:00) [3]

хм... у себя посмотрел - находит папки и H и S
 if FindFirst('c:\*.*',faAnyFile, F)=0 then
 try
   repeat
     Memo1.Lines.Add(F.Name);
   until FindNext(F)<>0;
 finally
   FindClose(F);
 end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо