按钮点击事件/附上例子

吾爱精益

根据编辑框数值循环点击按钮麻烦弄号传上来一下 按钮点击事件.zip (1.18 KB, 下载次数: 40)

2016-9-12 17:58 上传

点击文件名下载附件

皮皮鲨

670847663 发表于 2016-9-12 18:15
嗯是这样！不过能不能不用时钟只用线程，用时钟程序教卡。还有你这个按钮2下面那个调试输出有什么作用么 ...

调试输出只是为了证明他执行了时间
用时钟卡的解决办法是在时钟里启动线程，而不是直接放代码

皮皮鲨

这个意思？

15039346689

按钮点击事件.zip (1.44 KB, 下载次数: 23)

2016-9-12 18:10 上传

点击文件名下载附件

吾爱精益

猿人 发表于 2016-9-12 18:10
这个意思？

嗯是这样！不过能不能不用时钟只用线程，用时钟程序教卡。还有你这个按钮2下面那个调试输出有什么作用么？能删掉么？

15039346689

  

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

如果 (按钮1.标题 ＝ “开始点击”)
按钮1.标题 ＝ “停止点击”
循环判断首 ()
_按钮2_被单击 ()
延迟 (到数值 (编辑框1.内容) × 1000)
循环判断尾 (按钮1.标题 ＝ “停止点击”)

如果 (按钮1.标题 ＝ “停止点击”)
按钮1.标题 ＝ “开始点击”

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

调试输出 (1)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果 (按钮1.标题 ＝ “开始点击”)<br /> 按钮1.标题 ＝ “停止点击”<br /> <br /> .循环判断首 ()<br /> <br /> _按钮2_被单击 ()<br /> 延迟 (到数值 (编辑框1.内容) × 1000)<br /> .循环判断尾 (按钮1.标题 ＝ “停止点击”)<br /> <br /> .否则<br /> .如果 (按钮1.标题 ＝ “停止点击”)<br /> <br /> 按钮1.标题 ＝ “开始点击”<br /> .否则<br /> <br /> .如果结束<br /> <br /> .如果结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> <br /> 调试输出 (1)

补充内容 (2016-9-12 18:22):
这个不用时钟

皮皮鲨

15039346689 发表于 2016-9-12 18:22
[e=0].版本 2
.支持库 spec

延迟不会更卡程序吗0.0很少用延迟

吾爱精益

猿人 发表于 2016-9-12 18:25
延迟不会更卡程序吗0.0很少用延迟

  按钮2先的  调试输出 (1)   有什么作用吗？能不能删掉

皮皮鲨

670847663 发表于 2016-9-12 18:35
按钮2先的  调试输出 (1)   有什么作用吗？能不能删掉

可以删掉 可以删掉 可以删掉

吾爱精益

猿人 发表于 2016-9-12 18:36
可以删掉 可以删掉 可以删掉

.版本 2
.支持库 spec

.子程序 _按钮1_被单击

.如果 (按钮1.标题 ＝ “开始点击”)
    按钮1.标题 ＝ “停止点击”
    .循环判断首 ()
        _按钮2_被单击 ()
        延迟 (到数值 (编辑框1.内容) × 1000)
    .循环判断尾 (按钮1.标题 ＝ “停止点击”)
.否则
    .如果 (按钮1.标题 ＝ “停止点击”)
        按钮1.标题 ＝ “开始点击”
    .否则

    .如果结束

.如果结束


.子程序 _按钮2_被单击

调试输出 (1)


程序在执行直接关闭窗口好像线程终止不了！要怎么终止这个线程啊