源码是易语言网络传送支持库的应用,实现了进度下载,并且可以限速下载。
.版本 2
.支持库 downlib
.支持库 iext6
.子程序 _时钟1_周期事件
.局部变量 已经下载, 文本型
.局部变量 百分比, 文本型
已经下载 = “已经下载:” + 取文本左边 (到文本 (下载对象.取已下载长 () ÷ 1024 ÷ 1024), 4) + “M”
百分比 = 到文本 (到整数 (下载对象.取已下载长 () ÷ 1024 ÷ 1024 ÷ (取文件尺寸 (通用对话框1.文件名) ÷ 1024 ÷ 1024 ÷ 100))) + “%”
标签1.标题 = 已经下载 + “|” + 百分比 + “总大小:” + 到文本 (到整数 (取文件尺寸 (通用对话框1.文件名) ÷ 1024 ÷ 1024)) + “M”
标签2.标题 = “任务速度:” + 取文本左边 (到文本 (下载对象.取下载速度 () ÷ 1024), 4) + “kb/秒” + “ ” + “总速度:” + 取文本左边 (到文本 (取总下载速度 () ÷ 1024), 4) + “kb/秒”
多功能条1.位置 = 下载对象.取已下载长 () ÷ 1024 ÷ 1024