压缩文件操作类模块,支持进度查看的解压缩

易语言 2020-07-21 00:12:19

压缩文件操作类模块,支持进度查看的解压缩

.子程序 到标准路径, 文本型, , 本方法为内部方法,将路径文本中的“/”替换为“\”
.参数 内部专用路径, 文本型
.局部变量 部_临时文本, 文本型

' // [标准路径]的定义:
' // 1、根目录为空,这点与资源管理器相同,前面加上盘符如“c:\”即可组成完整的路径;
' // 2、所有目录尾部均无任何特殊标志,如“\”符号;
.如果真 (内部专用路径 = “” 或 内部专用路径 = “\”)
返回 (“”)
.如果真结束
部_临时文本 = 子文本替换 (内部专用路径, “/”, “\”, , , 假)
部_临时文本 = 子文本替换 (部_临时文本, “\\”, “\”, , , 假)
.如果真 (取文本右边 (部_临时文本, 1) = “\”)
部_临时文本 = 取文本左边 (部_临时文本, 取文本长度 (部_临时文本) - 1)
.如果真结束
返回 (部_临时文本)