有个源码，需要加个信息框

xuerui520

已完成100%之后   弹出个信息框提示，  已下载完成   新人一个  谁帮加个信息框



下载显示进度文件大小.zip (4 KB, 下载次数: 8)

2025-3-26 21:38 上传

点击文件名下载附件
这是源码

是可可吖

xuerui520 发表于 2025-3-26 22:05
能不能直接加在 e文件里  我自己弄老出错

下载显示进度文件大小.e (11.56 KB, 下载次数: 8)

2025-3-26 22:31 上传

点击文件名下载附件

算法艺术家

  

子程序名	返回值类型	公开	备 注
下载子程序

HTTP进度下载 (全局_下载地址, 取运行目录 () ＋ “\” ＋ 全局_保存文件名, &进度显示, )
信息框 (“完成”, 0, “提示”, )

.版本 2<br /> <br /> .子程序 下载子程序<br /> <br /> HTTP进度下载 (全局_下载地址, 取运行目录 () ＋ “\” ＋ 全局_保存文件名, &进度显示, )<br /> 信息框 (“完成”, 0, “提示”, )

是可可吖

  

子程序名	返回值类型	公开	备 注
进度显示
参数名	类 型	参考	可空	数组	备 注
总大小	整数型
目前下载	整数型
目前时间	整数型
实际下载	整数型

变量名	类 型	静态	数组	备 注
下载速度	双精度小数型
剩余时间	双精度小数型

下载速度 ＝ 四舍五入 (实际下载 × 1000 ÷ 1024 ÷ 目前时间, 2)
_启动窗口.标签_下载速度.标题 ＝ 到文本 (下载速度) ＋ “KB/秒”
_启动窗口.进度条1.位置 ＝ 目前下载 × 10000 ÷ 总大小
_启动窗口.标签_已完成百分比.标题 ＝ 全局_保存文件名 ＋ “-已完成：” ＋ 到文本 (四舍五入 (目前下载 ÷ 总大小 × 100, )) ＋ “%”
_启动窗口.标签_总大小.标题 ＝ 到文本 (四舍五入 (总大小 ÷ 1024 ÷ 1024, 2)) ＋ “MB”
如果真 (四舍五入 (目前下载 ÷ 总大小 × 100, ) ＝ 100)
信息框 (“下载完成！”, 0, , )

.版本 2<br /> <br /> .子程序 进度显示<br /> .参数 总大小, 整数型<br /> .参数 目前下载, 整数型<br /> .参数 目前时间, 整数型<br /> .参数 实际下载, 整数型<br /> .局部变量 下载速度, 双精度小数型<br /> .局部变量 剩余时间, 双精度小数型<br /> <br /> 下载速度 ＝ 四舍五入 (实际下载 × 1000 ÷ 1024 ÷ 目前时间, 2)<br /> _启动窗口.标签_下载速度.标题 ＝ 到文本 (下载速度) ＋ “KB/秒”<br /> _启动窗口.进度条1.位置 ＝ 目前下载 × 10000 ÷ 总大小<br /> _启动窗口.标签_已完成百分比.标题 ＝ 全局_保存文件名 ＋ “-已完成：” ＋ 到文本 (四舍五入 (目前下载 ÷ 总大小 × 100, )) ＋ “%”<br /> _启动窗口.标签_总大小.标题 ＝ 到文本 (四舍五入 (总大小 ÷ 1024 ÷ 1024, 2)) ＋ “MB”<br /> .如果真 (四舍五入 (目前下载 ÷ 总大小 × 100, ) ＝ 100)<br />     信息框 (“下载完成！”, 0, , )

aipca

  

如果真 (进度条1.位置 ＝ 10000)
信息框 (“下载完成”, 0, , )

.版本 2<br /> <br /> .如果真 (进度条1.位置 ＝ 10000)<br />     信息框 (“下载完成”, 0, , )

xuerui520

能不能直接加在 e文件里  我自己弄老出错