【院刊】-【201503期】QUI界面不再卡死 _ 学院院刊

查看: 30973\|回复: 180	[技术交流] 【院刊】-【201503期】QUI界面不再卡死 [复制链接]

果兒

组别初中三年级
UID2220985
帖子396
精华0
鲜花522 朵
铜币2506 个
银币334 个
在线时间480
注册时间2013-10-27

1^#

字体大小: t T

发表于 2015-02-25 12:56 | |只看楼主

QUI界面不再卡死

本文由按键学院提供技术支持

按键学院交流群（1群已满）：376122403

零基础学按键精灵群（2群）：372671254

Qui界面加载之后卡死？点击控件之后卡死？
为什么会出现这种情况？该如何解决？
且听小编细细道来~

原因

QUI界面事件如果添加循环命令，或者延时命令。添加之后，我们再去点击QUI界面，就会出现卡死的现象。

QUI界面事件：

: 您所在的用户组无法下载或查看附件

窗口事件以及控件事件统称为界面事件。

界面事件?
按键精灵是怎么知道我们点击了哪个控件，鼠标移动到了界面的哪里了呢？
其实，我们看似平常的一个操作，
例如：移动鼠标到窗口界面上点击输入框。
这样的一个操作，其实是被分解成了几百条消息反馈给按键精灵软件，告诉它鼠标现在在哪里，做了什么，点击了控件，然后控件要响应什么操作等等。

而这些消息，按键精灵软件会逐条处理，处理完这一条才会继续处理下一条。

所以，当它在处理循环事件会延时事件时，没有处理完之前都不处理其它信息。

使用循环命令导致界面卡死的解决方法

1、多线程

界面上有两个控件，输入框1（[backcolor=rgb(247, 247, 247)]InputBox1）和按钮1（[backcolor=rgb(247, 247, 247)]Button1）
当按下按钮1（[backcolor=rgb(247, 247, 247)]Button1）时，启动线程，将延时命令和循环命令放在线程里执行。循环一百次给输入框赋值。

: 您所在的用户组无法下载或查看附件

代码：

Event Form1.Button1.Click
BeginThread 循环 //启动线程
End Event
Sub 循环
For i = 1 To 100
Delay 200
Form1.InputBox1.Text = "" & i
Next
End Sub

复制代码

2、定时器

: 您所在的用户组无法下载或查看附件

定时器的有效设置为否
时间间隔设置为200毫秒（执行一次循环需要的时间）

当按下按钮1（[backcolor=rgb(247, 247, 247)]Button1）时，将定时器的有效设置为是（ Form1.Timer1.Enabled = True）
定时器每隔200毫秒会执行一次 Timer 事件
我们在 Timer事件中，定义一个变量i，每执行一次 Timer时间i的值叠加1，直到i的值等于我们设置循环次数，则将定时器的有效设置为否。

代码：

Event Form1.Button1.Click
Form1.Timer1.Enabled = True
End Event
Event Form1.Timer1.Timer
i = i + 1
If i= 100 then Form1.Timer1.Enabled=False
Form1.InputBox1.Text = "" & i
End Event

复制代码

3、API函数

我们已经知道了，界面卡住，是因为在处理循环命令时，产生了其它的消息导致的。
那么我们可以这样做，当在执行循环命令时，界面上的其它所有消息都忽略掉，不反馈给按键精灵软件
要用到四个Api函数：LocalAlloc、PeekMessageA、TranslateMessage、 DispatchMessageA、LocalFree

代码：

Declare Function PeekMessageA Lib "user32.dll" Alias "PeekMessageA"(ByVal 消息格式 As Any,ByVal 窗口句柄 As Long,ByVal 消息最小过滤值 As Long,ByVal 消息最大过滤值 As Long,ByVal 删除消息 As Long) As Long
Declare Function LocalAlloc Lib "kernel32" Alias "LocalAlloc" (ByVal wOemChar As Long,ByVal wOmChar As Long) As Long
Declare Function LocalFree Lib "kernel32" Alias "LocalAlloc" (ByVal hMem As Long) As Long
Declare Function TranslateMessage Lib "user32.dll" Alias "TranslateMessage"(ByVal 消息结构 As Any) As Long
Declare Function DispatchMessageA Lib "user32.dll" Alias "DispatchMessageA"(ByVal 消息结构 As Any) As Long
Event Form1.Button1.Click
For i=1 to 100
Form1.InputBox1.Text = "" & i
call 处理事件
Next
End Event
Sub 处理事件()
WM=LocalAlloc (0,28) //分配一块存储空间用于存放消息

If PeekMessageA(WM, 0, 0, 0, 1)

使用延时命令导致界面卡死的解决方法

API函数

当我们的延时命令不是放在多线程里，也不是靠定时器来处理，一定要放在QUI事件中时，该怎么办呢？
我们用上面说到的Api函数忽略消息的方法外加一个API函数：GetTickCount
来模拟一个在QUI界面事件中可执行的延时命令。

函数：
GetTickCount：GetTickCount返回从操作系统启动所经过的毫秒数

步骤：
我们先获取一次操作系统启动经过的毫秒数，放到变量s中
然后循环再次获取操作系统启动经过的毫秒数，如果小于我们设定的延时，就继续忽略消息，如果达到延时数则继续下一条循环。

代码： 0 Then //获取当前程序的消息存放在 "消息结构"里，然后将消息删除，忽略不处理

TranslateMessage WM //将空消息转换成程序可识别格式（虚拟键消息转换为字符消息）
DispatchMessageA WM //将转完格式的空消息反馈给程序
End If
LocalFree WM //释放存储空间
End Sub

复制代码

注意：

使用API函数忽略消息有个弊端，那就是当我们忽略消息的过程中，如果我们关闭了窗口，那只是假关闭。
窗口的关闭是操作系统处理响应的，而关闭窗口之后要触发的一些操作，例如销毁进程、释放内存空间等等，都是程序本身在执行。但是程序被关闭时的状态是忽略处理消息的状态，关闭窗口要触发的操作被忽略掉了。
所以看上去窗口被关闭了，实际上窗口还在运行中。

帖子中API函数方法由[backcolor=rgb(229, 237, 242)]风__琪仙提供
特别感谢 [backcolor=rgb(229, 237, 242)]风__琪仙 童鞋~~

本文由按键学院提供技术支持

【招生】主流回合制常见功能网络辅助教学——你懂得！

已有4评分我要评分查看所有评分

本主题由超级版主瑞祥幽冥狼于 2023/10/5 18:06:53 执行审核帖子操作

按键学院免费交流群：376122403

按键学院招生计划
按键学院系统教程

回顶部

发送短消息 UID 1394532 帖子 50 精华 0 鲜花 0 朵铜币 153 个银币 0 个性别在线时间 840 注册时间 2012-10-30 最后登录 2016-10-03 123456 查看公共资料搜索主题搜索帖子 yaozi_12 yaozi_12 组别小学二年级 UID1394532 帖子50 精华0 鲜花0 朵铜币153 个银币0 个在线时间840 注册时间2012-10-30	2^# 字体大小: t T 发表于 2016-10-03 01:17 \| \|只看该用户好好学习天天向上


	回顶部

发送短消息 UID 4125619 帖子 15 精华 0 鲜花 0 朵铜币 84 个银币 0 个性别在线时间 1100 注册时间 2016-09-19 最后登录 2019-04-18 849925374 查看公共资料搜索主题搜索帖子 yelwx521 yelwx521 组别幼儿园 UID4125619 帖子15 精华0 鲜花0 朵铜币84 个银币0 个在线时间1100 注册时间2016-09-19	3^# 字体大小: t T 发表于 2016-11-04 08:18 \| \|只看该用户学习了


	回顶部

发送短消息 UID 3782801 帖子 504 精华 0 鲜花 11 朵铜币 732 个银币 262 个性别在线时间 13940 注册时间 2016-02-28 最后登录 2024-02-14 查看公共资料搜索主题搜索帖子 zhoudiaofei 猕猴桃组别高中一年级 UID3782801 帖子504 精华0 鲜花11 朵铜币732 个银币262 个在线时间13940 注册时间2016-02-28 按键图书勋章尊贵的按键图书用户按键明星按键明星勋章按键精灵开发者6级可通过提升认证等级来升级勋章：rz.anjian.com	4^# 字体大小: t T 发表于 2016-11-09 01:21 \| \|只看该用户大家好


	回顶部

发送短消息 UID 4171896 帖子 102 精华 0 鲜花 1 朵铜币 287 个银币 5 个性别在线时间 2940 注册时间 2016-10-20 最后登录 2016-11-24 769262245 查看公共资料搜索主题搜索帖子 zuihuli zuihuli 组别小学五年级 UID4171896 帖子102 精华0 鲜花1 朵铜币287 个银币5 个在线时间2940 注册时间2016-10-20	5^# 字体大小: t T 发表于 2016-11-11 15:46 \| \|只看该用户 22222222


	回顶部

发送短消息 UID 2076572 帖子 45 精华 0 鲜花 0 朵铜币 89 个银币 0 个性别在线时间 460 注册时间 2013-08-14 最后登录 2016-11-16 14593497 查看公共资料搜索主题搜索帖子 linlance linlance 组别小学二年级 UID2076572 帖子45 精华0 鲜花0 朵铜币89 个银币0 个在线时间460 注册时间2013-08-14	6^# 字体大小: t T 发表于 2016-11-15 20:33 \| \|只看该用户 kankan


	回顶部

发送短消息 UID 3135071 帖子 5 精华 0 鲜花 0 朵铜币 43 个银币 0 个性别在线时间 120 注册时间 2015-03-18 最后登录 2016-11-16 查看公共资料搜索主题搜索帖子 yueyu874 yueyu874 组别幼儿园 UID3135071 帖子5 精华0 鲜花0 朵铜币43 个银币0 个在线时间120 注册时间2015-03-18	7^# 字体大小: t T 发表于 2016-11-16 14:03 \| \|只看该用户感谢，学习一下~~~~~~~~~~


	回顶部

发送短消息 UID 4210448 帖子 6 精华 0 鲜花 0 朵铜币 25 个银币 0 个性别在线时间 220 注册时间 2016-11-15 最后登录 2016-11-17 查看公共资料搜索主题搜索帖子 ctang 组别幼儿园 UID4210448 帖子6 精华0 鲜花0 朵铜币25 个银币0 个在线时间220 注册时间2016-11-15	8^# 字体大小: t T 发表于 2016-11-17 00:11 \| \|只看该用户老是卡死


	回顶部

发送短消息 UID 3859452 帖子 59 精华 0 鲜花 -2 朵铜币 78 个银币 -2 个性别在线时间 2180 注册时间 2016-04-10 最后登录 2018-01-23 查看公共资料搜索主题搜索帖子 747379163 组别小学三年级 UID3859452 帖子59 精华0 鲜花-2 朵铜币78 个银币-2 个在线时间2180 注册时间2016-04-10	9^# 字体大小: t T 发表于 2016-11-21 23:43 \| \|只看该用户我个就


	回顶部

发送短消息 UID 1588967 帖子 292 精华 0 鲜花 5 朵铜币 820 个银币 154 个性别在线时间 14160 注册时间 2013-02-01 最后登录 2019-03-31 2336738633 查看公共资料搜索主题搜索帖子 htsh826 htsh826 组别初中二年级 UID1588967 帖子292 精华0 鲜花5 朵铜币820 个银币154 个在线时间14160 注册时间2013-02-01 按键X开拓者勋章按键精灵X版开拓者勋章按键精灵开发者4级可通过提升认证等级来升级勋章：rz.anjian.com	10^# 字体大小: t T 发表于 2016-11-25 10:06 \| \|只看该用户真格的


	回顶部

发送短消息 UID 3634283 帖子 133 精华 0 鲜花 0 朵铜币 275 个银币 0 个性别在线时间 2480 注册时间 2015-12-08 最后登录 2018-05-02 查看公共资料搜索主题搜索帖子 Mr丶杰Q辣 Mr丶杰Q辣组别小学六年级 UID3634283 帖子133 精华0 鲜花0 朵铜币275 个银币0 个在线时间2480 注册时间2015-12-08 按键精灵开发者2级可通过提升认证等级来升级勋章：rz.anjian.com	11^# 字体大小: t T 发表于 2016-11-30 14:38 \| \|只看该用户水电费多福多寿


	回顶部

发送短消息 UID 2441014 帖子 206 精华 0 鲜花 8 朵铜币 329 个银币 14 个性别在线时间 8820 注册时间 2014-03-30 最后登录 2022-03-30 53588288 查看公共资料搜索主题搜索帖子 divna divna 组别初中一年级 UID2441014 帖子206 精华0 鲜花8 朵铜币329 个银币14 个在线时间8820 注册时间2014-03-30	12^# 字体大小: t T 发表于 2016-12-05 05:56 \| \|只看该用户学习中


	回顶部

发送短消息 UID 939715 帖子 2008 精华 0 鲜花 259 朵铜币 3486 个银币 693 个性别在线时间 64980 注册时间 2011-12-21 最后登录 2024-04-05 185220901 查看公共资料搜索主题搜索帖子 kspz kspz 组别大学四年级 UID939715 帖子2008 精华0 鲜花259 朵铜币3486 个银币693 个在线时间64980 注册时间2011-12-21 过大年勋章俩小福娃给大家拜年啦！抗战胜利70周年勋章抗战胜利70周年活动的专属勋章幸运草勋章商业小精灵限时活动勋章。鹰眼勋章鹰眼注册用户专属勋章黄瓜勋章体验商业小精灵活动的奖励按键明星按键明星勋章骨灰级按键用户 3年以上的按键论坛用户按键精灵开发者6级可通过提升认证等级来升级勋章：rz.anjian.com 按键会员（年）按键会员绑定账号后自动赠送学有所成学有所成勋章，新手步入按键学堂的第一枚勋章	13^# 字体大小: t T 发表于 2016-12-12 02:07 \| \|只看该用户 QUI界面不再卡死
	官方实名认证作者 QQ：185220901 承接游戏,办公...各类脚本制作

	回顶部

发送短消息 UID 2370604 帖子 4 精华 0 鲜花 0 朵铜币 22 个银币 0 个性别在线时间 80 注册时间 2014-02-12 最后登录 2022-02-13 241741766 查看公共资料搜索主题搜索帖子 xuejiakero xuejiakero 组别幼儿园 UID2370604 帖子4 精华0 鲜花0 朵铜币22 个银币0 个在线时间80 注册时间2014-02-12	14^# 字体大小: t T 发表于 2016-12-23 14:13 \| \|只看该用户阿斯大三大四的大


	回顶部

发送短消息 UID 4237425 帖子 191 精华 0 鲜花 0 朵铜币 281 个银币 0 个性别在线时间 4460 注册时间 2016-12-04 最后登录 2017-08-12 343805827 查看公共资料搜索主题搜索帖子 wakes wakes 组别初中一年级 UID4237425 帖子191 精华0 鲜花0 朵铜币281 个银币0 个在线时间4460 注册时间2016-12-04	15^# 字体大小: t T 发表于 2017-01-07 04:08 \| \|只看该用户 66666666666666


	回顶部

发送短消息 UID 154000 帖子 23 精华 0 鲜花 0 朵铜币 42 个银币 0 个性别在线时间 1160 注册时间 2007-10-22 最后登录 2023-11-30 查看公共资料搜索主题搜索帖子 max500max5 max500max5 组别小学一年级 UID154000 帖子23 精华0 鲜花0 朵铜币42 个银币0 个在线时间1160 注册时间2007-10-22	16^# 字体大小: t T 发表于 2017-01-08 14:20 \| \|只看该用户 444444444444444


	回顶部

发送短消息 UID 4169694 帖子 47 精华 0 鲜花 10 朵铜币 104 个银币 11 个性别在线时间 3300 注册时间 2016-10-19 最后登录 2024-04-02 12345 查看公共资料搜索主题搜索帖子 maxrocker maxrocker 组别小学二年级 UID4169694 帖子47 精华0 鲜花10 朵铜币104 个银币11 个在线时间3300 注册时间2016-10-19	17^# 字体大小: t T 发表于 2017-01-08 14:38 \| \|只看该用户谢谢分享，学习学习


	回顶部

发送短消息 UID 4151730 帖子 74 精华 0 鲜花 0 朵铜币 129 个银币 0 个性别在线时间 1140 注册时间 2016-10-07 最后登录 2017-04-01 120252563 查看公共资料搜索主题搜索帖子 Hans.F Hans.F 组别小学四年级 UID4151730 帖子74 精华0 鲜花0 朵铜币129 个银币0 个在线时间1140 注册时间2016-10-07	18^# 字体大小: t T 发表于 2017-01-09 12:30 \| \|只看该用户 RE:【院刊】-【201503期】QUI界面不再卡死修改


	回顶部

发送短消息 UID 4250907 帖子 506 精华 0 鲜花 17 朵铜币 1522 个银币 -1 个性别在线时间 8420 注册时间 2016-12-14 最后登录 2017-04-09 查看公共资料搜索主题搜索帖子实践者组别高中一年级 UID4250907 帖子506 精华0 鲜花17 朵铜币1522 个银币-1 个在线时间8420 注册时间2016-12-14	19^# 字体大小: t T 发表于 2017-01-10 09:13 \| \|只看该用户了解一下


	回顶部

发送短消息 UID 2368330 帖子 200 精华 0 鲜花 0 朵铜币 264 个银币 0 个性别在线时间 3700 注册时间 2014-02-10 最后登录 2017-03-07 523743156 查看公共资料搜索主题搜索帖子 tangzihua tangzihua 组别初中一年级 UID2368330 帖子200 精华0 鲜花0 朵铜币264 个银币0 个在线时间3700 注册时间2014-02-10	20^# 字体大小: t T 发表于 2017-01-13 13:25 \| \|只看该用户网沙特等国需


	回顶部

上一主题| 下一主题

[技术交流] 【院刊】-【201503期】QUI界面不再卡死 [复制链接]