1 Тема от Amon-Ra

  • Amon-Ra
  • Участник
  • Неактивен

Тема: АНК: установление количества повторов через окно

Подскажите, желательно с примером, как сделать так что бы после нажатия F9 появилось окно в котором можно было ввести количество повторов( цифру после Loop) и подтвердить, после чего будет выполнятся комбинация ниже.

F9::

   Loop
   {
      MouseClick, Left, 580, 577
      Sleep, 2500
      MouseClick, Left, 900, 370
      Sleep, 500
   }
   
   Return

2 Ответ от Grey (изменено: Grey, 2012-02-23 18:22:36)

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

Re: АНК: установление количества повторов через окно

F9::
Settings:
   Gui, +AlwaysOnTop -MinimizeBox
   Gui, Add, Edit, vCounter x6 y6 w75 h20, Set loopcount
   Gui, Add, Button, gConfirm xp+80 yp wp-25 hp, &Confirm
   Gui, Show, Center h34 w142, Settings
   Return

Confirm:
   Gui, Submit
   Gui, Destroy
   If RegExMatch(Counter, "\D")
   {
      MsgBox, 262160, Error, Enter digits only!, 1
      Goto, Settings
   }
   Loop, % Counter
   {
      MouseClick, Left, 580, 577
      Sleep, 2500
      MouseClick, Left, 900, 370
      Sleep, 500
   }
   Return

GuiClose:
   ExitApp

3 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: АНК: установление количества повторов через окно

Вместо этого

Grey пишет:
   If RegExMatch(Counter, "\D")
   {
      MsgBox, 262160, Error, Enter digits only!, 1
      Goto, Settings
   }

можно просто добавить слово "Number" в опции Edit.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder

4 Ответ от Grey

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

Re: АНК: установление количества повторов через окно

Просили пример, он есть, теперь можно делать с ним, что душе угодно.

5 Ответ от Александр_

  • Александр_
  • Разработчик
  • Неактивен

Re: АНК: установление количества повторов через окно

InputBox.

6 Ответ от Grey

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

Re: АНК: установление количества повторов через окно

InputBox - тоже вариант:

F9::
Settings:
   InputBox, Counter
           , Settings
           , % "  Enter digits only"
           ,, 125, 115
           , A_ScreenWidth/2-62
           , A_ScreenHeight/2-55
           ,,, % "  Set loopcount  "
   If ErrorLevel
      ExitApp
   If RegExMatch(Counter, "\D")
      Goto, Settings
   Loop, % Counter
   {
      MouseClick, Left, 580, 577
      Sleep, 2500
      MouseClick, Left, 900, 370
      Sleep, 500
   }
   Return