Серый форум — AHK: Прогресс бар

Re: AHK: Прогресс бар

null@example.com (ypppu) — Fri, 03 Jun 2022 14:41:29 +0000

Разберитесь сначала на простом. Вот цитата из справки:

GuiControl,, MyProgress, 50 ; Устанавливаем текущую позицию на 50.

Теперь Вы знаете, как визуально изменять шкалу прогресса. Далее вместо 50 подставим какую-нибудь переменную. Таким образом команда при каждом вызове будет "заглядывать" в содержимое этой переменной:

GuiControl,, MyProgress, N ; Устанавливаем текущую позицию на N

Вам остаётся периодически вычислять N и вслед за этим выполнять вышеуказанную команду.

Re: AHK: Прогресс бар

null@example.com (__Михаил__) — Fri, 03 Jun 2022 14:39:27 +0000

Для работы с прогрессбаром нужно как минимум знать две переменные - сколько файлов всего и сколько уже обработал скрипт.

AHK: Прогресс бар

null@example.com (Logonius) — Fri, 03 Jun 2022 10:50:48 +0000

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

Код к которому нужно привязать прогресс бар, который будет выплывать как отдельное окно, пример >>>

+ открыть спойлер

ErrorCount := CopyFilesAndFolders2("test\*.*", A_Desktop "\")
if ErrorCount <> 0
      MsgBox %ErrorCount%, Файл(ы) или папка(и) не могут быть скопированы, скорей всего они заблолкированы или используются. `n`nВосстановление продолжается, не закрывайте программу.

CopyFilesAndFolders2(SourcePattern, DestinationFolder, DoOverwrite = true)
{
   FileCopy, %SourcePattern%, %DestinationFolder%, %DoOverwrite%
   ErrorCount := ErrorLevel

   Loop, %SourcePattern%, 2
   {
      FileCopyDir, %A_LoopFileFullPath%, %DestinationFolder%\%A_LoopFileName%, %DoOverwrite%
      ErrorCount += ErrorLevel
      if ErrorLevel
         MsgBox Не удалось скопировать %A_LoopFileFullPath% в %DestinationFolder%.
   }
   return ErrorCount
}

Спасибо.