smile, 发表于 2013-7-8 18:24

关于易语言的问

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

小贵 发表于 2013-7-8 18:39

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

stop1204 发表于 2013-7-8 18:42

.版本 2

.程序集 窗口程序集1

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


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


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

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

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

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

stop1204 发表于 2013-7-8 19:04

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

.版本 2
.支持库 EdirectX

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

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

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

.如果真结束


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


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









.版本 2
.支持库 EdirectX

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

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


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


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

1354669803 发表于 2013-7-8 19:06

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

stop1204 发表于 2013-7-8 19:08

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

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


我也不懂API {:1_907:}哈哈








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

smile, 发表于 2013-7-9 12:15

谢谢各位,确实可以,已经实现了
页: [1]
查看完整版本: 关于易语言的问