许可区进入问题

星马豪

连续点击按钮1，还没退出许可区就会进入，按钮2就不会。这是什么原理，除了延时还有哪些操作会出现按钮1的这种情况呢？很头大，程序老是卡死，最后发现许可区竟然没限制成功

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_线程锁	线程许可证

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

集_线程锁 ＝ 线程_创建许可证 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击

线程_进入许可区 (集_线程锁)
调试输出 (“已进入”)
程序_延时 (3, 1)
线程_退出许可区 (集_线程锁)
调试输出 (“已退出”)

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
文本	文本型

线程_进入许可区 (集_线程锁)
调试输出 (“已进入”)
计次循环首 (100000000000, )
文本 ＝ “”
计次循环尾 ()
线程_退出许可区 (集_线程锁)
调试输出 (“已退出”)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_线程锁, 线程许可证<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 集_线程锁 ＝ 线程_创建许可证 ()<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 线程_进入许可区 (集_线程锁)<br /> 调试输出 (“已进入”)<br /> 程序_延时 (3, 1)<br /> 线程_退出许可区 (集_线程锁)<br /> 调试输出 (“已退出”)<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 文本, 文本型<br /> <br /> 线程_进入许可区 (集_线程锁)<br /> 调试输出 (“已进入”)<br /> .计次循环首 (100000000000, )<br />     文本 ＝ “”<br /> .计次循环尾 ()<br /> 线程_退出许可区 (集_线程锁)<br /> 调试输出 (“已退出”)

许可证测试.e (955.38 KB, 下载次数: 4)

3 天前 上传

点击文件名下载附件

凌哥

所有在UI线程中会主动进行消息循环的函数，都会导致代码运行调度问题比如我下面这张图演示的过程，先点击按钮1，然后点击按钮2
你可能以为，按钮2的触发是 我鼠标点击 才响应的，然而事实上是，按钮2被单击的事件，其实是在按钮1事件里面的 程序_延时() 内部的 消息循环，也就是处理事件() 去执行的；
所以本质上这个流程的代码执行顺序是：

_按钮1_被单击
线程_进入许可区 (集_线程锁) -按钮1
“_按钮1_被单击” | “已进入”
程序_延时 (3, 1)
_按钮2_被单击
线程_进入许可区 (集_线程锁) -按钮2
“_按钮2_被单击” | “已进入”
.计次循环首 (100000000000, )
    文本 ＝ “”
.计次循环尾 ()
线程_退出许可区 (集_线程锁) -按钮2
“_按钮2_被单击” | “已退出”
线程_退出许可区 (集_线程锁) -按钮1
“_按钮1_被单击” | “已退出”

又因为，线程锁本质上设计就是允许同一条线程多次进入的，执行按钮1按钮2事件的线程是同一个；
所以连续点击按钮1，还没退出许可区就会进入，因为你连续点击按钮1的时候，除了第一次点击，剩下的点击都是在 程序_延时() 里面递归触发，直到所有按钮点击的事件都执行完毕，最开始点击时执行的 程序_延时() 才会返回，而且最开始执行的这个可能会卡住超过3秒~





许可证测试.e (1.08 MB, 下载次数: 1)

昨天 16:37 上传

点击文件名下载附件

samll88

既然是线程许可证,应该是对线程内有效,想要对所有程序生效,用普通许可证吧.

519948746

脑壳疼，这点√8玩意 非要用模块，建议多脱离模块  学习核心库，模块是用来锦上添花的 不是越俎代庖的
你用模块我也不知道问题在哪 那玩意基本不用 对它不熟悉，经过测试  核心库没有问题

果冻大砍刀

连续点击的话最好执行开始加个按钮禁止为真,走完改为假