易语言循环语句给窗口中的标签及进度条赋值却无法实现，并假死

显示全部楼层 · 2011-2-17 01:34:42

我想先载入进度提示窗口，然后在计次循环结构中给进度提示窗口中的标签和进度条赋值

，但无法实现而且假死，窗口中的停止按钮也无法点击，我想到了用处理事件（）但也只是标

签有反应，进度条没反应，不知何故，请各位高数赐教！并予以修改意见！
源码：（本来想发个链接，但百度的审核实在太慢了）
.版本 2
.支持库 iext

.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型

载入 (处理窗口, , 假)
.计次循环首 (20, i)

处理事件 ()

处理窗口.标签1.标题＝ “正在处理：”

处理窗口.标签2.标题＝ “当前[” ＋到文本 (i) ＋ “/” ＋到文本 (20) ＋ “]”

处理窗口.透明标签1.标题＝到文本 (四舍五入 (i ÷ 20, ) × 100) ＋ “%”

处理窗口.进度条1.位置＝四舍五入 (i ÷ 20, ) × 100

延时 (2000)
.计次循环尾 ()

PS：我把原程序的代码用“延时(2000)”代替了，不过效果还是一样的。
透明标签是显示执行了多少次÷20 X 100%，一共执行20次，每次2秒.标签2是当前第几次。

千问 · 2011-2-17 01:34:42

<pre id=\\\"best-answer-content\\\">.版本 2
.支持库 EThread
.支持库 iext

.子程序 __启动窗口_创建完毕

载入 (处理窗口, _启动窗口, 假)\\\' 设定处理窗口位于启动窗口的上层
启动线程 (defds123进度条处理, 37, )\\\' 取用线程程序使用延时不会卡
\\\' 37为循环的次数自己可以更改

.子程序进度条处理
.参数循环次数, 整数型
.局部变量 i, 整数型
.局部变量线程句柄, 整数型

.计次循环首 (循环次数, i)

处理窗口.标签1.标题＝ “正在处理：”

处理窗口.标签2.标题＝ “当前[” ＋到文本 (i) ＋ “/” ＋到文本 (循环次数) ＋ “]”

处理窗口.透明标签1.标题＝到文本 (取整 (i ÷ 循环次数 × 100)) ＋ “%”

处理窗口.进度条1.位置＝ i ÷ 循环次数 × 100

延时 (200)
.计次循环尾 ()

千问 · 2011-2-17 01:34:42

<p>

<pre class=\\\"answer-content\\\">把四舍五入去掉就好了

.版本 2
.支持库 iext

.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型

载入 (处理窗口, , 假)
.计次循环首 (20, i)

处理事件 ()

处理窗口.标签1.标题＝ “正在处理：”

处理窗口.标签2.标题＝ “当前[” ＋到文本 (i) ＋ “/” ＋到文本 (20) ＋ “]”

处理窗口.透明标签1.标题＝到文本 (i ÷ 20 × 100) ＋ “%”

处理窗口.进度条1.位置＝i ÷ 20 × 100

延时 (2000)
.计次循环尾 ()

</p>

千问 · 2011-2-17 01:34:42

<p>

<pre class=\\\"answer-content\\\">a=查找文本（你的文本，“target=_blank”，）
判断循环首（a0）

b=查找文本（你的文本，“/A/TD”，a）
取出来的内容=取文本中间（你的文本，a 1,b-a-1） \\\'这里可以用编辑框装着
a=查找文本（你的文本，“target=_blank”，b）

判断循环尾

</p>