请问易语言的键盘控制源码如何制作的 我拿来参考的 不复制原创 学习易语言中...

 我来答
匿名用户
2013-06-20
展开全部
是记录键盘按下的键吗??很简单的。。不管在哪按都有效 利用hook

.版本 2
.支持库 xplib
.支持库 spec
.支持库 eAPI

.程序集 窗口程序集1
.程序集变量 hook, 整数型

.子程序 __启动窗口_创建完毕

XP风格 (1)
编辑框1.输入方式 = 1
hook = SetWindowsHookEx (13, &钩子函数, GetModuleHandle (0), 0)
调试输出 (GetModuleHandle (0))
调试输出 (hook)
fz ()

.子程序 钩子函数, 整数型, , 钩子函数
.参数 参数一, 整数型
.参数 参数二, 整数型, , 类型、状态
.参数 参数三, 整数型, , 键代码指针
.局部变量 键值, 整数型

键值 = 取字节集数据 (指针到字节集 (参数三, 1), 3, )

.判断开始 (参数二 = 256)
.判断开始 (取键盘指示灯状态 (#接口常量.大小写锁定键盘灯))
编辑框1.加入文本 (字符 (键值))
.判断 (键值 ≥ 65 且 键值 ≤ 90)
编辑框1.加入文本 (字符 (键值 + 32))
.默认
编辑框1.加入文本 (字符 (键值))
.判断结束

.判断开始 (键值 = #回车键)
调试输出 (“钩子检测到你按下了回车键!!!!”)

.默认

.判断结束

.默认

.判断结束
返回 (CallNextHookEx (hook, 参数一, 参数二, 参数三))

.子程序 __启动窗口_将被销毁

UnHookWindowsHookEx (hook)

DLL定义

.版本 2

.DLL命令 GetModuleHandle, 整数型, , "GetModuleHandleA"
.参数 lpModuleName, 整数型

.DLL命令 CallNextHookEx, 整数型, , "CallNextHookEx"
.参数 hhk, 整数型
.参数 nCode, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型

.DLL命令 SetWindowsHookEx, 整数型, , "SetWindowsHookExA"
.参数 idHook, 整数型
.参数 lpfn, 子程序指针
.参数 hmod, 整数型
.参数 dwThreadId, 整数型

.DLL命令 UnHookWindowsHookEx, 逻辑型, , "UnhookWindowsHookEx"
.参数 hhk, 整数型

自定义数据类型

.版本 2

.数据类型 MSG
.成员 message, 整数型
.成员 paramL, 整数型
.成员 paramH, 整数型
.成员 time, 整数型
.成员 hwnd, 整数型

控制键盘的话。。。模拟按键应该可以。...我的理解大概就是这样。。如果理解错的话,说一声。。
匿名用户
2013-06-20
展开全部
请问是什么类型的控制?监视按键?后台按键?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式