| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1314 人关注过本帖
标题:[求助]钩子截获消息后
取消只看楼主 加入收藏
winnip1
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2007-4-16
收藏
 问题点数:0 回复次数:2 
[求助]钩子截获消息后
事情是这样的。在我截获按键消息后,也就是 win(窗口)键,我想给屏蔽掉。
不知道有没有办法。
Public Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
Public Declare Function CallNextHookEx Lib "user32" (ByVal hHook As Long, ByVal ncode As Long, ByVal wParam As Long, lParam As Any) As Long
Public Hook1 As Long
Public Const WH_KEYBOARD = 2
Public Const VK_LWIN = &H5B
Public Declare Function UnhookWindowsHookEx Lib "user32" (ByVal hHook As Long) As Long
Public Function MyHook(ByVal ncode As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
If ncode >= 0 Then
MyHook = 0
If wParam = &H5B <> 0 Then
If (lParam And &HC000000) = 0 Then '截获按下窗口键。。。
MyHook = 1
End If
End If
End If
Call CallNextHookEx(Hook1, ncode, wParam, lParam)
End Function
请指点。谢谢。
搜索更多相关主题的帖子: Long ByVal 钩子 Public 截获 
2007-04-16 03:05
winnip1
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2007-4-16
收藏
得分:0 
大家就帮帮我这个新来的吧。,。。。。。
我熬了好几个夜晚了。。。哭.....
2007-04-16 09:21
winnip1
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2007-4-16
收藏
得分:0 
2007-04-16 09:46
快速回复:[求助]钩子截获消息后
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021575 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved