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

.版本 2

.支持库 spec

.程序集 窗口程序集1

.程序集变量 当前位置, 整数型

.程序集变量 文件尺寸, 整数型

.程序集变量 每次下载的大小, 整数型

.程序集变量 是否下载完毕, 逻辑型

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

文件尺寸 ＝ 1024 ' KB

每次下载的大小 ＝ 128

进度条1.最大位置 ＝ 文件尺寸

.子程序 _开始下载_被单击

.局部变量 当前进度, 整数型

.判断循环首 (是否下载完毕 ＝ 假)

当前位置 ＝ 当前位置 ＋ 每次下载的大小 ' 这个是下载文件

.如果 (当前进度 ≠ 文件尺寸)

当前进度 ＝ 当前位置 ÷ 文件尺寸 × 文件尺寸

进度条1.位置 ＝ 当前进度

标签1.标题 ＝ “百分比：” ＋ 到文本 (当前进度 ÷ 文件尺寸 × 100) ＋ “%”

标签2.标题 ＝ “已下载：” ＋ 到文本 (当前进度) ＋ “/” ＋ 到文本 (文件尺寸) ＋ “ KB”

.否则

是否下载完毕 ＝ 真

信息框 (“下载完毕”, 0, )

.如果结束

延迟 (1000)

.判断循环尾 ()

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

是否下载完毕 ＝ 真

信息框 (“停止下载”, 0, )

调用格式： 〈整数型〉 对象．取已下载长 （） - 网络传送支持库->下载对象

英文名称：GetDownFileSize

获得任务已下载大小。本命令为初级对象成员命令。

*** 作系统需求： Windows、Linux

用这个命令可以取出已下载的长度

db2.mdb 大吗？http读文件（）用来下载文件够呛的，你可以用 下载对象 或者 有个进度下载模块 ，自己找找 。真的要效果好的话，迅雷有开放SDK 这个就很强了。百度 迅雷引擎

---