关于易语言的问

smile，

大家好，我有两个问题想向大家求助，第一个是怎么测试键盘上的键代码，以前我好像是当按下键盘上的某键，信息框提示按的那个键的键代码，现在忘了，要用的时候想不起来了，第二个是，怎么让鼠标在整个屏幕的任何窗口都可以，鼠标左键按下或者放开的时候让我设置的时钟周期等于0呢，研究了半天没搞懂，希望大家教我该怎么弄，谢谢各位了

小贵

大家好，我有两个问题想向大家求助，第一个是怎么测试键盘上的键代码，以前我好像是当按下键盘上的某键，信息框提示按的那个键的键代码，现在忘了，要用的时候想不起来了，第二个是，怎么让鼠标在整个屏幕的任何窗口都可以，鼠标左键按下或者放开的时候让我设置的时钟周期等于0呢，研究了半天没搞懂，希望大家教我该怎么弄，谢谢各位了

stop1204

.版本 2

.程序集 窗口程序集1

.子程序 _编辑框1_内容被改变, , , 作用同字符输入相同


' 标题 ＝ 到文本 (取代码 (编辑框1.内容, 1))


.子程序 _编辑框1_字符输入, 整数型
.参数 字符代码, 整数型

标题 ＝ 到文本 (字符代码)

.子程序 _编辑框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

' 该程序作用,当你输入a时候,编辑框会有a,然后输入b ,会自动帮你把a清除掉,然后编辑框只剩b,让你不用手动去删除a再输入b
编辑框1.内容 ＝ “”

stop1204

如果你需要的话,输入设备1.初始化 (0)  是可在所有窗口(除被屏蔽),  响应事件,  如果只在你的软件窗口则, 输入设备1.初始化 (取窗口句柄())

.版本 2
.支持库 EdirectX

.子程序 _输入设备1_鼠标按键被改变
.参数 键值, 整数型
.参数 键状态, 整数型
.局部变量 状态判断, 整数型

.如果 (键值 ＝ 256)  ' 256为鼠标左键,按下时候本判断执行
    状态判断 ＝ 1
.否则
    状态判断 ＝ 0
.如果结束

.如果真 (状态判断 ＝ 1)  ' 当鼠标放开时候 本判断执行
    .如果真 (键状态 ＝ 1)
        标题 ＝ 到文本 (到整数 (标题) ＋ 1)  ' 计算点击了几下(当放开时才计数)
    .如果真结束

.如果真结束


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


输入设备1.选择输入设备 (真, 真, 假)
输入设备1.置刷新时间 (10)
输入设备1.初始化 (0)
输入设备1.激活 ()

[AppleScript] 纯文本查看 复制代码

.版本 2
.支持库 EdirectX

.局部变量 存放字符, 文本型

输入设备1.取键名 (到整数 (编辑框1.内容), 存放字符)  ' 文本型 存放字符
输出调试文本 (存放字符)
编辑框2.内容 ＝ 存放字符


-----------------------------------


上面是反取键代码的功能, 就是你输入一个键值 如 97, 然后 你要有个 按钮或其他方式来执行以上的代码,然后将会把 97所对应的键代码 返回给你

1354669803

楼上已经给出答案来了 本来还说给你两个API的说

stop1204

1354669803 发表于 2013-7-8 19:06
楼上已经给出答案来了 本来还说给你两个API的说

算了吧-.-  API对这些入门的 很麻烦的说 , ,


我也不懂API 哈哈








楼主这个 要是看了不给点 反应对不起我啊 ,             热心 CB 什么什么的随便来点

smile，

谢谢各位，确实可以，已经实现了