Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.11.28;
Скачать: CL | DM;

Вниз

Список папок/файлов   Найти похожие ветки 

 
dkDimon   (2004-10-14 21:50) [0]

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


 
GuAV ©   (2004-10-14 22:15) [1]

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


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

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


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

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



Страницы: 1 вся ветка

Текущий архив: 2004.11.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.028 c
14-1099990616
denisww
2004-11-09 11:56
2004.11.28
Ищу репетитора по BD, SQL и тд


1-1100375861
TSoftman
2004-11-13 22:57
2004.11.28
Иконка файла


11-1082976944
nester
2004-04-26 14:55
2004.11.28
А куда делся OnException?


14-1100240303
Павел
2004-11-12 09:18
2004.11.28
Запуск delphi c другого компьютера.


4-1097936385
Spark2
2004-10-16 18:19
2004.11.28
win1251