1 Тема от exobangs

  • exobangs
  • Участник
  • Неактивен

Тема: AHK: Поиск изображений

Здравствуйте дорогие форумчани, появилась необходимость найти все изображения на пк, помогите как реализовать?

2 Ответ от Malcev

  • Malcev
  • Разработчик
  • Неактивен

Re: AHK: Поиск изображений

https://naveensnayak.wordpress.com/2011 … l-pictures

3 Ответ от exobangs

  • exobangs
  • Участник
  • Неактивен

Re: AHK: Поиск изображений

Мне нужно именно средствами AHK, полный алгоритм таков, найдутся все изображения, добавятся в архив, отправятся на сервер. Поиск по одному формату я знаю как сделать, но поочерёдно каждый формат искать мне кажется будет очень долго.

4 Ответ от Alectric (изменено: Alectric, 2015-11-29 13:27:39)

  • Alectric
  • Разработчик
  • Неактивен

Re: AHK: Поиск изображений

Loop (файлы и папки).

Gui, Add, Listview, w490 h380 cBlue Count100000 AltSubmit -Multi,count|ext|file
Gui, Show
f=0
start:=a_tickcount
Loop,d:\*.*,0,1
{
  if (A_LoopFileExt and instr("jpg,bmp,jpeg",A_LoopFileExt))
    LV_Add(,f:=f+1,A_LoopFileExt,A_LoopFileFullPath)
  if enough
    break
}
msgbox,% "Done at " (a_tickcount-start)//1000 " seconds."
return

f1::
enough=1
tooltip
return
Win 10 x64
AHK
                       Справка AHK v1 тебе в помощь.

5 Ответ от Malcev (изменено: Malcev, 2015-11-29 17:48:06)

  • Malcev
  • Разработчик
  • Неактивен

Re: AHK: Поиск изображений

if (A_LoopFileExt and instr("jpg,bmp,jpeg",A_LoopFileExt))

Может быть ошибка, так как форматов различных очень много.
Например определенные 2-ух буквенные расширения в данном коде попадут в картинки.
Я бы сделал точным перечислением.

if A_LoopFileExt in jpg,bmp,jpeg