大神来看看，为什么实现不了

badcwytga · 发表于 2012-10-1 15:21:12

#import "dm.dmsoft" dm
空间 AAA
功能逻辑型按钮0_点击()
整型键状态
整型毫秒
字符型时间
循环(真)
键状态=dm.GetKeyState(49)
如果(键状态==1)
时间=系统.时间(0)
毫秒=系统.获取毫秒()
循环(真)
键状态=dm.GetKeyState(49)
如果(键状态==0)
标签.设置文本("标签1",转换.整型转字符型(毫秒)-)(时间))
标签.设置文本("标签0","按下1键")
如果结束
循环结束
如果结束
循环结束
返回真
功能结束
空间结束

冷月无痕 · 发表于 2012-10-1 15:32:04

标签.设置文本("标签1",转换.整型转字符型(毫秒)-)(时间))
改为
标签.设置文本("标签1",转换.整型转字符型(毫秒)+转换.整型转字符型(时间))
PS：死循环要用线程开启别直接写在按钮事件里

badcwytga · 发表于 2012-10-1 15:51:54

回复 2楼冷月无痕的帖子

语法错误哇

冷月无痕 · 发表于 2012-10-1 15:59:23

回复 3楼badcwytga的帖子

额不好意思看错变量
标签.设置文本("标签1",转换.整型转字符型(毫秒)+时间)

badcwytga · 发表于 2012-10-1 16:15:02

回复 4楼冷月无痕的帖子

怎么说呢，我是想·获取键盘信息，按下键盘1后，再按2.

然后获取1转2之间的毫秒

冷月无痕 · 发表于 2012-10-1 16:22:24

整型按键码 = 键盘.等待按键()
如果(按键码==(需要相应的按键码，比如49))
//按下键盘1
整型开始 = 系统.系统.获取毫秒()
// 按下键盘2
整型结束 = 系统.系统.获取毫秒()
标签.设置文本("标签1",转换.整型转字符型(结束-开始))
如果结束

badcwytga · 发表于 2012-10-1 16:26:26

回复 6楼冷月无痕的帖子

怎么得出的是 0

冷月无痕 · 发表于 2012-10-1 16:29:44

回复 7楼badcwytga的帖子

你两次按键之间加点延时看看还是0不

badcwytga · 发表于 2012-10-1 16:40:54

回复 8楼冷月无痕的帖子

功能逻辑型键盘()
循环(真)
整型按键码 = 键盘.等待按键()
如果(按键码==49)

整型开始 = 系统.获取毫秒()

整型结束 = 系统.获取毫秒()

标签.设置文本("标签0",转换.整型转字符型(结束-开始))

如果结束

如果(按键码==50)

整型开始 = 系统.获取毫秒()

整型结束 = 系统.获取毫秒()

标签.设置文本("标签0",转换.整型转字符型(结束-开始))

如果结束

循环结束
返回真
功能结束

功能逻辑型按钮0_点击()
整型线程句柄=线程.开启("AAA.键盘","")
返回真
功能结束

我开启线程后我按键盘获取的延迟都是0

冷月无痕 · 发表于 2012-10-1 16:45:43

额你是要酱紫的吖
循环(真)
整型按键码 = 键盘.等待按键()
如果(按键码==49)

整型开始 = 系统.获取毫秒()

如果结束
如果(按键码==50)
整型结束 = 系统.获取毫秒()
如果结束
标签.设置文本("标签0",转换.整型转字符型(结束-开始))
循环结束

试试这样

帐号		自动登录	找回密码
密码			立即注册

[已解决] 大神来看看，为什么实现不了

本帖子中包含更多资源

站长推荐 /2