取磁盘空间的API+例子郑码
.版本 2
.支持库 spec
.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
.局部变量 总空间, 字节集
.局部变量 剩余空间1, 字节集
.局部变量 剩余空间2, 字节集
总空间 ＝ 取空白字节集 (255)
剩余空间1 ＝ 取空白字节集 (255)
剩余空间2 ＝ 取空白字节集 (255)
SHGetDiskFreeSpaceA (“C:\”, 剩余空间1, 总空间, 剩余空间2)
调试输出 (“总空间大小： ” ＋ 到文本 (四舍五入 (取字节集数据 (总空间, #长整数型, ) ÷ 1024 ÷ 1024, )) ＋ “ MB”, “总剩余空间大小： ” ＋ 到文本 (四舍五入 (取字节集数据 (剩余空间1, #长整数型, ) ÷ 1024 ÷ 1024, )) ＋ “ MB”, “剩余空间大小： ” ＋ 到文本 (四舍五入 (取字节集数据 (剩余空间2, #长整数型, ) ÷ 1024 ÷ 1024, )) ＋ “ MB”)
返回 (0)
页:
[1]