下你所需,载你所想!
汇集开发技术源码资料

程序输出日志记录

:4.316KB :1 :2021-11-09 16:01:25

部分简介

.子程序 文件_取实际大小_, 长整数型, , 获取一个文件在磁盘上实际占据的字节数,如文件右键属性中的大小,显示就是实际压缩过的尺寸
.参数 文件路径, 文本型
.局部变量 uil, ULARGE_INTEGER_LOG
.局部变量 len, 长整数型

uil.LowPart = GetCompressedFileSize_log (文件路径, uil.HighPart)
.如果 (uil.LowPart < 0)
uil.LowPart = 位与 (uil.LowPart, 2147483647)
len = 相加_ULL (相乘_ULL (uil.HighPart, 4294967296), 相加_ULL (2147483648, uil.LowPart))
.否则
len = 相加_ULL (相乘_ULL (uil.HighPart, 4294967296), uil.LowPart)
.如果结束
返回 (len)

热门推荐

相关文章