Серый форум — AHK: Блокировать кнопку при появлении картинки

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (Malcev) — Sat, 28 Sep 2013 19:10:50 +0000

Не, так не работает вообще.

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (Alectric) — Sat, 28 Sep 2013 16:21:52 +0000

Может так:

Lshift::
Sendplay,{lshift up}
Keywait,lshift
Return

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (Malcev) — Fri, 27 Sep 2013 19:58:27 +0000

На первой строчке надо #Persistent написать?
Все-равно мигает.
Я зажимаю Shift при запущенном коде и курсор мигает так как-будто, то я нажимаю на шифт, то отпускаю.

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (serzh82saratov) — Fri, 27 Sep 2013 14:02:12 +0000

При таком запущенном коде, блокируется как надо?


   OnExit, Exit
   hHookKeybd := DllCall("SetWindowsHookEx" . (A_IsUnicode ? "W" : "A")
      , Int, WH_KEYBOARD_LL := 13
      , Ptr, RegisterCallback("LowLevelKeyboardProc", "Fast")
      , Ptr, DllCall("GetModuleHandle", UInt, 0, Ptr)
      , UInt, 0, Ptr)
   Return

Exit:
   DllCall("UnhookWindowsHookEx", Ptr, hHookKeybd)
   ExitApp

LowLevelKeyboardProc(nCode, wParam, lParam)
{
   Critical
   If NumGet(lParam+0, 0, "UInt") = 160 ; 160 dec vk code LShift
        Return 1
   Return DllCall("CallNextHookEx", Ptr, 0, Int, nCode, UInt, wParam, UInt, lParam)
}

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (serzh82saratov) — Fri, 27 Sep 2013 13:46:24 +0000

Так что именно мигает. Когда нажимаешь на LShift должно мигать, в смысле без блокировок, и в какой то программе?

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (Malcev) — Fri, 27 Sep 2013 13:30:57 +0000

Да.

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (serzh82saratov) — Fri, 27 Sep 2013 13:29:54 +0000

Так тоже мигает?

LShift:: return

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (Malcev) — Fri, 27 Sep 2013 13:27:10 +0000

Мигает так же. Наверное перехват у программы идет быстрее.
При том вариант Irbis работает хуже, чем мой или serzh82saratov.

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (serzh82saratov) — Fri, 27 Sep 2013 13:02:49 +0000

Irbis
Действительно так лучше, зачем проверять в цикле когда надо только при нажатии.
А что имелось ввиду под &.

Malcev пишет:

The following variable name contains illegal character "&x"

Попробуй так:


#if pict(x, y)
LShift:: return 
#if 
return

pict(ByRef x, ByRef y)
{ 
    ImageSearch, x, y, 0, 0, A_ScreenWidth, A_ScreenHeight, D:\strelka.png
    return !ErrorLevel
}

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (Malcev) — Fri, 27 Sep 2013 12:55:10 +0000

Error at line 6.
The following variable name contains illegal character "&x"

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (Irbis) — Fri, 27 Sep 2013 06:08:22 +0000

Зачем изобретать велосипед?

#if pict(&x,  &y)
LShift:: return 
#if 
return

pict(&x,  &y)
{ 
ImageSearch, x, y, 0, 0,
A_ScreenWidth,
A_ScreenHeight, D:\strelka.png
  return  !ErrorLevel
}

это в случае, если нужно сохранить найденные координаты. Если нет, то параметры в функцию можно не передавать.

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (Malcev) — Thu, 26 Sep 2013 23:50:47 +0000

Так же помигивает.

Re: AHK: Блокировать кнопку при появлении картинки

null@example.com (serzh82saratov) — Thu, 26 Sep 2013 23:40:24 +0000

Так попробуй:


loop
{
   ImageSearch, x, y, 0, 0, A_ScreenWidth, A_ScreenHeight, D:\strelka.png
   Hotkey, LShift, Block, % !ErrorLevel ? "On" : "Off"
   Sleep, 50
}  

Block: 
    return

AHK: Блокировать кнопку при появлении картинки

null@example.com (Malcev) — Thu, 26 Sep 2013 23:30:52 +0000

Написал следующий код - при появлении картинки, который при появлении картинки блокирует зажатие шифта.
Но работает как-то не так при зажатии шифта - курсор мелькает, как-будто шифт-таки нажимается.
Что тут не так?

loop
{
   ImageSearch, x, y, 0, 0, A_ScreenWidth, A_ScreenHeight, D:\strelka.png
   if !ErrorLevel
   {
      while GetKeyState("LShift")
         LShift:: return
   }
   Sleep, 50
}