Что нового

Активация запущенного приложения по нажатию клавиши

Rymex

Новичок
Сообщения
4
Репутация
0
Допустим запущено несколько приложений, надо по нажатию клавиш клавиатуры активировать конкретное окно.

Тут, я думаю, я сделал чтобы по нажатию 1 стало актвным нужное приложение, а по нажатию 2 цикл кончался и скрипта закрывался.

Код:
$a=0

while $a=0

if send("1")  then WinActive("Блокнот") 
if send("2")  then $a=1

WEnd


У меня получается что после запуска скрипт сразу сам печатает 1 и 2 и закрываеца. А мне надо чтоб он ждал пока я сам нажму. Что тут не так?
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Rymex,
Код:
HotKeySet()
 
Автор
R

Rymex

Новичок
Сообщения
4
Репутация
0
Большое спасибо, скрипт составлен, работает как хотел.

Код:
Global $Paused
HotKeySet("{1}", "Winnum01")			;=== Активация фокуса на нужном окне
HotKeySet("{2}", "Winnum02")
HotKeySet("{3}", "Winnum03")
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")			;=== Завершение программы


;=== Тело программы должно находится здесь ;===
While 1
   Sleep(100)
WEnd
;===

Func Winnum01()
    $Paused = Not $Paused
    While $Paused
        Sleep(100)
        WinActivate("...") ;=== тут название первого приложения
		TogglePause()
    WEnd
 EndFunc
 
 Func Winnum02()
    $Paused = Not $Paused
    While $Paused
        Sleep(100)
        WinActivate("...")   ;=== тут название второго приложения
		TogglePause()
    WEnd
 EndFunc
 
 Func Winnum03()
    $Paused = Not $Paused
    While $Paused
        Sleep(100)
        WinActivate("...")   ;=== тут название третьего приложения
		TogglePause()
    WEnd
 EndFunc
 
  
 Func TogglePause()
    $Paused = Not $Paused
    While $Paused
        Sleep(100)
        ToolTip('Скрипт приостановлен')
    WEnd
    ToolTip("")
EndFunc

Func Terminate()
    Exit 0
EndFunc


На самом деле, почти все скопировано из описания самого ХотКея (там внизу страницы пример), я только немного адаптировал для себя. Кто его знает вобще что такое "Global $Paused", но раз работает не стал убирать.

Сначала после WinActivate небыло TogglePause, но после активации окна и следующего клика в любое другое окно первое окно в любом случае активировалось само и фокус был на нем, пока не отключиш скрипт, кто его знает как так, подумал - надо его как то прервать, тут увидел ТоглПауз, ну наудачю его вставил, оказалось работает)

Это как - Машина сломалась, запустил туда руку в двигатель, пошурудил чего то, машина завелась) Хотя может быть эта машина и ездит теперь боком, но до места назначения она меня доставляет.
 
Верх