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

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

Поиск файлов? [D5, WinME]


dimich ©   (2002-03-16 10:00:00) 

Как можно найти все файлы с расширением exe,com,bat при этом избегая поиска в папке Windows или вообще целого диска.
Если можно , то на примере.
Заранее благодарен МАСТЕРАМ!


Anatoly Podgoretsky   (2002-03-16 18:02:00) [1]

Проверил, диск 20 гб, 3000 папок, 44000 файлов - время сканирования 13 секунд, пример из FAQ - это много или мало?
ProcessMessages времени не изменяет.


Velocity   (2002-03-16 17:26:00) [2]

Дополню: может конечно из-за других факторов так быстро диск сканится. типа количества каталогов, шустрости винта и т.д. буду считать что ошибся в совете, заплюсуйте ;-))))


Velocity   (2002-03-16 17:21:00) [3]

2 wicked
поверю на слово (говорил же что плохо шарю ;-)) но странно - один мой знакомый чел написал чистилку для диска (испытывал данную мессагу), которая грохает мусорные файлы на диске (любом). Так у него данная прога полностью сканирует 6 гиговый диск (т.е. ищет и удаляет на нём указанные мусорные файлы) приблизительно за 15-20 секунд. Я конеш не в курсе - это получается "медленно"? Сам я в коде не рылся но вот прогу испытывал - дикая вещь. Получается findfirst/findnext/findclose быстрее справятся?


Anatoly Podgoretsky   (2002-03-16 17:08:00) [4]

А что бы не всего диска надо отказаться сканировать хотя бы одну папку, лучше для этого создать специальную пустую


wicked   (2002-03-16 17:04:00) [5]

2 Velocity
ха-ха-ха... у нас MSDN есть... только LB_DIR хорош, если надо отобразитьсодержимое однойпапки... а если надо пробежаться по определённым файлам в папке и во вложенных папках и выполнить определённое действие, то это уже не проходит... только findfirst/findnext/findclose... кстати, скорость работы такой кнструкции оченьбольшая....


Velocity   (2002-03-16 16:18:00) [6]

Ха-ха-ха! Почему НИКТО не упомянул мессагу LB_DIR для ListBox"а? Плиз, не считайте наездом (куда уж мне до многих, сорри), но просто даже странно... такая красивая мессага, такой мелкий код получается и так быстро работает - а вниманием обошли... Кому интересно как это делается - мыльте на dv2000@hotbox.ru, кину примерчик


MBo   (2002-03-16 10:07:00) [7]

http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1014734835&n=0
хороший вариант у Набережных С. (08.03.02 21:02)

свое добавишь к
if (Sr.Name".")and(Sr.Name"..") then


MBo   (2002-03-16 10:02:00) [8]

найди в форуме примеры поиска FindFirst etc
и добавь проверку, скажем, в Windows не заходить


dimich   (2002-03-16 10:02:00) [9]

Не предлагайте пожалуйста "кладовочный" вариант.


Наверх

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