易语言怎么设置按下左键就弹出信息框?
鼠标在软件任何地方按下左键都会弹出一个信息框,怎么写?我在程序事件里选了鼠标左键被按下,可是他没反应......
鼠标在软件任何地方按下左键都会弹出一个信息框, 怎么写? 我在程序事件里选了鼠标左键被按下, 可是他没反应...
展开
3个回答
展开全部
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
hook = SetWindowsHookExA (14, &钩子处理, GetModuleHandleA (0), 0)
.子程序 钩子处理, 整数型
.参数 code, 整数型
.参数 wp, 整数型
.参数 lp, 整数型
.如果真 (wp = 513)
信息框 (“您按下了左键 ”, 0, )
.如果真结束
返回 (CallNextHookEx (hook, code, wp, lp))
.子程序 __启动窗口_可否被关闭, 逻辑型
UnhookWindowsHookEx (hook)
.版本 2
.DLL命令 CallNextHookEx, 整数型, , "CallNextHookEx"
.参数 hook, 整数型
.参数 nCode, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型
.DLL命令 UnhookWindowsHookEx, 整数型, "user32.dll", "UnhookWindowsHookEx", , 卸载一个钩字
.参数 hook, 整数型
.DLL命令 SetWindowsHookExA, 整数型, "user32.dll", "SetWindowsHookExA", , 安装一个钩子
.参数 idHook, 整数型
.参数 lpfn, 子程序指针
.参数 hmod, 整数型
.参数 dwThreadId, 整数型
.DLL命令 GetModuleHandleA, 整数型, , "GetModuleHandleA"
.参数 a, 整数型, , 0
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
hook = SetWindowsHookExA (14, &钩子处理, GetModuleHandleA (0), 0)
.子程序 钩子处理, 整数型
.参数 code, 整数型
.参数 wp, 整数型
.参数 lp, 整数型
.如果真 (wp = 513)
信息框 (“您按下了左键 ”, 0, )
.如果真结束
返回 (CallNextHookEx (hook, code, wp, lp))
.子程序 __启动窗口_可否被关闭, 逻辑型
UnhookWindowsHookEx (hook)
.版本 2
.DLL命令 CallNextHookEx, 整数型, , "CallNextHookEx"
.参数 hook, 整数型
.参数 nCode, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型
.DLL命令 UnhookWindowsHookEx, 整数型, "user32.dll", "UnhookWindowsHookEx", , 卸载一个钩字
.参数 hook, 整数型
.DLL命令 SetWindowsHookExA, 整数型, "user32.dll", "SetWindowsHookExA", , 安装一个钩子
.参数 idHook, 整数型
.参数 lpfn, 子程序指针
.参数 hmod, 整数型
.参数 dwThreadId, 整数型
.DLL命令 GetModuleHandleA, 整数型, , "GetModuleHandleA"
.参数 a, 整数型, , 0
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
在软件界面加入 透明标签组件
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询