![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поиск файлов? [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]Не предлагайте пожалуйста "кладовочный" вариант.