易语言真实进度条怎么写 比如我点击按钮一 开始下载了 下载完毕 进度条也走完

.版本 2
.支持库 spec

.程序集 窗口程序集1
.程序集变量 当前位置, 整数型
.程序集变量 文件尺寸, 整数型
.程序集变量 每次下载的大小, 整数型
.程序集变量 是否下载完毕, 逻辑型

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

文件尺寸 ＝ 1024 ' KB
每次下载的大小 ＝ 128
进度条1.最大位置 ＝ 文件尺寸

.子程序 _开始下载_被单击
.局部变量 当前进度, 整数型

.判断循环首 (是否下载完毕 ＝ 假)
当前位置 ＝ 当前位置 ＋ 每次下载的大小 ' 这个是下载文件
.如果 (当前进度 ≠ 文件尺寸)
当前进度 ＝ 当前位置 ÷ 文件尺寸 × 文件尺寸
进度条1.位置 ＝ 当前进度
标签1.标题 ＝ “百分比：” ＋ 到文本 (当前进度 ÷ 文件尺寸 × 100) ＋ “%”
标签2.标题 ＝ “已下载：” ＋ 到文本 (当前进度) ＋ “/” ＋ 到文本 (文件尺寸) ＋ “ KB”
.否则
是否下载完毕 ＝ 真
信息框 (“下载完毕”, 0, )
.如果结束
延迟 (1000)
.判断循环尾 ()

.子程序 _停止下载_被单击

是否下载完毕 ＝ 真
信息框 (“停止下载”, 0, )

主要看你怎么弄下载
用本身就有的支持库的话
在它的下载进行事件中，加入 进度条X.进度 = XXX.当前进度
不过这个因你下载的方式而异

如果它本身没有事件的话，就要+时钟，设置时间周期1000ms，下载完毕后再设为0ms
周期事件与前一方法一致

如果不提供下载进度，就依 进度条X.进度 = 已下载大小/文件大小*100

只是思路，有事Hi我

.版本 2

.子程序 _时钟1_周期事件

进度条1.位置 ＝ 进度条1.位置 ＋ 1
.如果 (进度条1.位置 ＝ 进度条1.最大位置)
时钟1.时钟周期 ＝ 0
载入 (窗口1, , 真)

.否则

.如果结束

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

时钟1.时钟周期 ＝ 100
------------------------------------------

进度条总长取下载总时间
之后
位置就是取下载时间
就行了

取下载时间