Global oKeys := {Func:"MyFuncName", Skip:{"vk70sc3B":"F1","vk71sc3C":"F2","vk73sc3E":"F4"}}, Count := 0
F4::Counter()
Counter() {
ToolTip % ++Count
}
MyFuncName(button, msg) {
Count := 0
ToolTip
}
KeyboardHook(nCode, wParam, lParam) {
Static msg, vk, sc
, oMsg := {0x100: "WM_KEYDOWN", 0x101: "WM_KEYUP", 0x104: "WM_SYSKEYDOWN", 0x105: "WM_SYSKEYUP"}
, hHookKeybd := DllCall("SetWindowsHookEx"
, Int, 13 ; WH_KEYBOARD_LL
, Ptr, RegisterCallback("KeyboardHook", "Fast")
, Ptr, DllCall("GetModuleHandle", UInt, 0, Ptr)
, UInt, 0, Ptr)
, _ := OnExit(Func("KeyboardHookExit").Bind(hHookKeybd))
msg := wParam . ""
vk := NumGet(lParam + 0, "UInt") . ""
ext := NumGet(lParam + 8, "UInt") & 1
sc := NumGet(lParam + 4, "UInt") | ext << 8 . ""
SetTimer, EventHandling, -10
Return DllCall("CallNextHookEx", Ptr, 0, Int, nCode, Ptr, wParam, Ptr, lParam)
EventHandling:
button := "vk" Format("{:x}", vk) "sc" Format("{:x}", sc)
If oKeys.Skip.HasKey(button)
Return
Func(oKeys.Func).Call(button, oMsg[msg])
Return
}
KeyboardHookExit(hHook) {
DllCall("UnhookWindowsHookEx", Ptr, hHook)
}
Esc::ExitApp
По вопросам возмездной помощи пишите на
E-Mail: serzh82saratov@mail.ru Telegram:
https://t.me/sergiol982Win10x64
AhkSpy,
Hotkey,
ClockGui