分享
 
 
 

编程使用系统热键{定时器SetTimer()和GetAsyncKeyState()}

王朝other·作者佚名  2006-03-10
窄屏简体版  字體: |||超大  

GetAsyncKeyState()

=========================

功能:确定用户当前是否按下了键盘上的一个键

原型:SHORT GetAsyncKeyState(int vKey);

参数:nVirtKey指出要检查键的虚键代码。结果的高位指出该键当前是否被按下(是为1,否为0)。

常用键的VK值:

VK_SHIFT Shift键

VK_LSHIFT 左Shift键

VK_RSHIFT 右Shift键

VK_CONTROL Ctrl键

VK_LCONTROL 左Ctrl键

VK_RCONTROL 右Ctril键

VK_MENU Alt键

VK_LMENU 左Alt键

VK_RMENU 右Alt键

VK_LBUTTON 鼠标左键

VK_RBUTTON 鼠标右键

另一个函数GetKeyState与GetAsyncKeyState函数不同。GetAsyncKeyState在按下某键的同时调用,判断正在按下某键。

GetKeyState则在按过某键之后再调用,它返回最近的键盘消息从线程的队列中移出时的键盘状态,判断刚按过了某键。

与RegisterHotKey()相比,GetAsyncKeyState()的优点在于可以监控鼠标按键,缺点是需要使用定时器。

;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; 文件名: HotKey2.asm

; 作者: Purple Endurer

; 功能: 演示定时器SetTimer()和GetAsyncKeyState()

; 点击“监测Alt+鼠标右键! 成功后按

; Alt+鼠标右键可打开记事本!”按钮,

; 把监测Alt+鼠标右键是否按下

; 如果注册不成功,则提示出错信息!

; 如果注册成功,则按Alt+鼠标右键时,

; 可将当前程序窗口恢复到前台

; 并启动计事本!

; 开发环境:Windows 2000 Pro + MASM32

; 注:源代码和可执行程序可以到http://purpleendurer.ys168.com下载

;

; Date log

;-------------------------------------------------

;2006-03-09 创建!

;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

.386

.model flat, stdcall

option casemap:none

include \masm32\include\windows.inc

include \masm32\include\user32.inc

include \masm32\include\kernel32.inc

include \masm32\include\shell32.inc

includelib \masm32\lib\user32.lib

includelib \masm32\lib\kernel32.lib

includelib \masm32\lib\shell32.lib

WinMain proto :DWORD, :DWORD, :DWORD, :DWORD

m_m2m MACRO d1, d2

push d2

pop d1

ENDM

.const

c_ButtonID equ 1

c_TimerID equ 1

.data

g_szWinClsName db "DemoWinClass", 0

g_szAppName db "系统演示程序2 by PurpleEndurer", 0

g_szBtnClsName db "button", 0

g_szFailSetTimer db "不能"

g_szRegisterKey db "监测Alt+鼠标右键! 成功后按Alt+鼠标右键可打开记事本!", 0

g_szFailKillTimer db "不能"

g_szUnregisterKey db "不监测Alt+鼠标右键!", 0

g_bRegisted dword FALSE

g_szOpen db "Open", 0

g_szNotePad db "NotePad", 0

.data?

hInstance HINSTANCE ?

CommandLine LPSTR ?

g_hwndButton HANDLE ?

.code

start:

invoke GetModuleHandle, NULL

mov hInstance, eax

invoke GetCommandLine

mov CommandLine, eax

invoke WinMain, hInstance, NULL, CommandLine, SW_SHOWDEFAULT

invoke ExitProcess, eax

WinMain proc hInst:HINSTANCE, hPrevInst:HINSTANCE, CmdLine:LPSTR, CmdShow:DWORD

LOCAL wc:WNDCLASSEX

LOCAL msg:MSG

LOCAL hwnd:HWND

mov wc.cbSize, SIZEOF WNDCLASSEX

mov wc.style, CS_HREDRAW or CS_VREDRAW

mov wc.lpfnWndProc, OFFSET WndProc

mov wc.cbClsExtra, NULL

mov wc.cbWndExtra, NULL

push hInstance

pop wc.hInstance

mov wc.hbrBackground, COLOR_WINDOW+1

mov wc.lpszMenuName, NULL

mov wc.lpszClassName, OFFSET g_szWinClsName

invoke LoadIcon, NULL, IDI_APPLICATION

mov wc.hIcon, eax

mov wc.hIconSm, eax

invoke LoadCursor, NULL, IDC_ARROW

mov wc.hCursor, eax

invoke RegisterClassEx, addr wc

INVOKE CreateWindowEx, NULL, ADDR g_szWinClsName, ADDR g_szAppName, WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInst, NULL

mov hwnd, eax

invoke ShowWindow, hwnd, SW_SHOWNORMAL

invoke UpdateWindow, hwnd

.WHILE TRUE

invoke GetMessage, ADDR msg, NULL, 0, 0

.BREAK .IF (!eax)

invoke TranslateMessage, ADDR msg

invoke DispatchMessage, ADDR msg

.ENDW

mov eax, msg.wParam

ret

WinMain endp

WndProc proc hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM

.IF uMsg==WM_DESTROY

.if g_bRegisted==TRUE

invoke KillTimer, hWnd, c_TimerID

.endif

invoke PostQuitMessage, NULL

.ELSEIF uMsg==WM_CREATE

;创建按钮

invoke CreateWindowEx, NULL, ADDR g_szBtnClsName, ADDR g_szRegisterKey, WS_CHILD or WS_VISIBLE or BS_DEFPUSHBUTTON,25, 25, 560, 50, hWnd, c_ButtonID, hInstance, NULL

mov g_hwndButton, eax

.ELSEIF uMsg==WM_COMMAND

mov eax, wParam

.IF lParam!=0

.IF ax==c_ButtonID

shr eax, 16

.IF ax==BN_CLICKED

.if g_bRegisted==TRUE

;禁用监测

invoke KillTimer, hWnd, c_TimerID

.IF eax==0

invoke MessageBox, hWnd, ADDR g_szFailKillTimer,ADDR g_szAppName, MB_ICONERROR

ret

.ENDIF

m_m2m g_bRegisted, FALSE

;修改按钮的文本

invoke SetWindowText, g_hwndButton, ADDR g_szRegisterKey

.else

;启用监测

invoke SetTimer, hWnd, c_TimerID, 100, NULL

.IF eax==0

invoke MessageBox, hWnd, ADDR g_szFailSetTimer,ADDR g_szAppName, MB_ICONERROR

ret

.ENDIF

m_m2m g_bRegisted, TRUE

;修改按钮的文本

invoke SetWindowText, g_hwndButton, ADDR g_szUnregisterKey

.endif

.ENDIF

.ENDIF

.ENDIF

.ELSEIF uMsg==WM_TIMER

invoke GetAsyncKeyState, VK_LMENU;左Alt键

test eax, 08000h

jz @F

invoke GetAsyncKeyState, VK_RBUTTON;鼠标右键

test eax, 08000h

jz @F

;把本程序窗口恢复到前台

invoke ShowWindow, hWnd, SW_RESTORE

invoke SetForegroundWindow, hWnd

;打开记事本

invoke ShellExecute, hWnd, ADDR g_szOpen, ADDR g_szNotePad, NULL, NULL, SW_RESTORE

@@:

.ELSE

invoke DefWindowProc, hWnd, uMsg, wParam, lParam

ret

.ENDIF

xor eax, eax

ret

WndProc endp

end start

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有