用时钟控制循环速度的问题

梦幻虚拟机找我

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

变量名	类 型	静态	数组	备 注
a	整数型

计次循环首 (100, a)
调试输出 (a)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 整数型<br /> <br /> .计次循环首 (100, a)<br />     调试输出 (a)<br /> .计次循环尾 ()

用时钟控制调试输出（A）的速度求源码

qq780571

梦幻虚拟机找我 发表于 2015-6-9 21:34
就是实现下面的效果
计次循环首（100，a）
调试输出（1）

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
计次	整数型

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

计次 ＝ 计次 ＋ 1
调试输出 (“a”)
时钟1.时钟周期 ＝ 取随机数 (1, 5) × 1000
如果真 (计次 ＝ 100)
时钟1.时钟周期 ＝ 0

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

时钟1.时钟周期 ＝ 取随机数 (1, 5) × 1000

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 计次, 整数型<br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> 计次 ＝ 计次 ＋ 1<br /> 调试输出 (“a”)<br /> 时钟1.时钟周期 ＝ 取随机数 (1, 5) × 1000<br /> .如果真 (计次 ＝ 100)<br />     时钟1.时钟周期 ＝ 0<br /> .如果真结束<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 时钟1.时钟周期 ＝ 取随机数 (1, 5) × 1000

leiyh

这个就不用时钟了吧  在循环里加延时 延时（到整数（编辑框1.内容））

落枫_rain

新建 易程序.zip (158.4 KB, 下载次数: 7)

2015-6-9 20:26 上传

点击文件名下载附件

梦幻虚拟机找我

一叶风飘絮 发表于 2015-6-9 20:26

亲，您看明白我的源码了吗？

梦幻虚拟机找我

leiyh 发表于 2015-6-9 20:06
这个就不用时钟了吧  在循环里加延时 延时（到整数（编辑框1.内容））

延时跟延迟都不行
运行来卡的很

leiyh

梦幻虚拟机找我 发表于 2015-6-9 20:54
延时跟延迟都不行
运行来卡的很

用精易模块的程序_延时（） 或用线程运行这个子程序

leiyh

  

子程序名	返回值类型	公开	备 注
test

变量名	类 型	静态	数组	备 注
a	整数型

计次循环首 (100, a)
延时 (到整数 (编辑框1.内容))
调试输出 (a)
计次循环尾 ()

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

启动线程 (&test, , )

i支持库列表	支持库注释
spec	特殊功能支持库
EThread	多线程支持库

.版本 2<br /> .支持库 spec<br /> .支持库 EThread<br /> <br /> .子程序 test<br /> .局部变量 a, 整数型<br /> <br /> .计次循环首 (100, a)<br /> 延时 (到整数 (编辑框1.内容))<br /> 调试输出 (a)<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 启动线程 (&test, , )

落枫_rain

梦幻虚拟机找我 发表于 2015-6-9 20:53
亲，您看明白我的源码了吗？

不就是调试输出100次A么-。-
你真的要控制他的话最好用时钟，不怎么会卡
这个的话他会一直执行一百次，你又没做什么资源释放啥的什么操作。
当然会卡

梦幻虚拟机找我

leiyh 发表于 2015-6-9 20:57
[e=0].版本 2
.支持库 spec
.支持库 EThread

有源码的吗？我这边用的模块太多了
卡的太厉害