⑴ 易语言真实进度条怎么写 比如我点击按钮一 开始下载了 下载完毕 进度条也走完
.版本 2
.支持库 spec
.程序集 窗口程序集1
.程序集变量 当前位置, 整数型
.程序集变量 文件尺寸, 整数型
.程序集变量 每次下载的大小, 整数型
.程序集变量 是否下载完毕, 逻辑型
.子程序 __启动窗口_创建完毕
文件尺寸 = 1024 ' KB
每次下载的大小 = 128
进度条1.最大位置 = 文件尺寸
.子程序 _开始下载_被单击
.局部变量 当前进度, 整数型
.判断循环首 (是否下载完毕 = 假)
当前位置 = 当前位置 + 每次下载的大小 ' 这个是下载文件
.如果 (当前进度 ≠ 文件尺寸)
当前进度 = 当前位置 ÷ 文件尺寸 × 文件尺寸
进度条1.位置 = 当前进度
标签1.标题 = “百分比:” + 到文本 (当前进度 ÷ 文件尺寸 × 100) + “%”
标签2.标题 = “已下载:” + 到文本 (当前进度) + “/” + 到文本 (文件尺寸) + “ KB”
.否则
是否下载完毕 = 真
信息框 (“下载完毕”, 0, )
.如果结束
延迟 (1000)
.判断循环尾 ()
.子程序 _停止下载_被单击
是否下载完毕 = 真
信息框 (“停止下载”, 0, )
⑵ 易语言FTP下载文件,怎么弄进度条
进度条1.位置 = 已下载大小/文件大小*100
给你思路了,应该很简单了。。。自己分析吧。
⑶ 易语言的进度条怎么显示FTP的下载进度
获取需要下载的文件大小,判断已经下载的大小和整体大小的百分比。易语言FTP下载不会向迅雷那样创建一个和被下载文件大小一样的缓存,而是下载多少就变成多大。
⑷ 易语言FTP下载进度显示(有用的话再加100财富)
标签1.标题 = 到文本 (四舍五入 (下载对象.取已下载长 () ÷ 1024 ÷ 1024, 2)) + “M” + “/” + 到文本 (四舍五入 (取文件尺寸 (本地文件) ÷ 1024 ÷ 1024, 2)) + “M”
希望对你有帮助。自己研究吧
⑸ 易语言怎么下载文件并显示进度
调用格式: 〈整数型〉 对象.取已下载长 () - 网络传送支持库->下载对象
英文名称:GetDownFileSize
获得任务已下载大小。本命令为初级对象成员命令。
操作系统需求: Windows、Linux
用这个命令可以取出已下载的长度
⑹ 在线求答案~~关于易语言进度条~~~~
下面是我的程序升级源码,供你参考:
.版本 2
.支持库 EThread
.程序集 窗口升级程序集
.程序集变量 FTP文件大小, 整数型
.程序集变量 本地文件名, 文本型
.程序集变量 本地文件, 整数型
.子程序 _升级窗口_创建完毕
.如果真 (取反 (文件是否存在 (取运行目录 () + “/ZH.exe”)))
写到文件 (取运行目录 () + “/ZH.exe”, #升级)
.如果真结束
.判断开始 (代理 = 4)
本地文件名 = “4.exe”
升级1 (“4”)
.判断 (代理 = 3)
本地文件名 = “3.exe”
升级1 (“3”)
.判断 (代理 = 2)
本地文件名 = “2.exe”
升级1 (“2”)
.判断 (代理 = 1)
本地文件名 = “1.exe”
升级1 (“1”)
.默认
.判断结束
_启动窗口.销毁 ()
.子程序 升级1
.参数 参数, 文本型
.如果 (FTP_连接FTP服务器 (“地址”, “用户名”, “密码”, ))
编辑框1.加入文本 (#换行符 + “连接服务器成功!”)
FTP文件大小 = FTP_文件取大小 (“/*********/web/大唐” + 参数 + “.exe”)
FTP文件大小 = 取整 (FTP文件大小 ÷ 1000)
编辑框1.加入文本 (#换行符 + “需要下载的文件大小为:” + 到文本 (FTP文件大小) + “M”)
时钟2.时钟周期 = 1000
启动线程 (&下载, , )
编辑框1.加入文本 (#换行符 + “正在下载,请稍候......”)
.否则
信息框 (“连接服务器失败!请联系客服。”, 0, )
.如果结束
返回 ()
.子程序 _时钟2_周期事件
.局部变量 位置1, 整数型
本地文件 = 取文件尺寸 (取运行目录 () + “/” + 本地文件名)
本地文件 = 取整 (本地文件 ÷ 10)
进度条1.位置 = 取整 (本地文件 ÷ FTP文件大小)
.如果真 (进度条1.位置 = 100)
时钟2.时钟周期 = 0
FTP_断开FTP服务器 ()
运行 (取运行目录 () + “/ZH.exe”, 假, )
销毁 ()
.如果真结束
.子程序 下载
FTP_文件下载 (“/******/web/大唐” + 到文本 (代理) + “.exe”, 取运行目录 () + “/” + 本地文件名, )
⑺ 易语言进度条怎么显示资料载入进度
.版本
2
编辑框1.内容
=
文件名
'
进度条1.最大位置=文件数目
进度条1.位置
=
进度条1.位置
+
1
.如果真
(进度条1.位置
=
总文件数)
信息框
(“载入完毕”,
0,
“载入完毕”)
.如果真结束
⑻ 易语言FTP下载进度
db2.mdb 大吗?http读文件()用来下载文件够呛的,你可以用 下载对象 或者 有个进度下载模块 ,自己找找 。真的要效果好的话,迅雷有开放SDK 这个就很强了。网络 迅雷引擎