想挑战自己硬盘容量的进来

francis

用易语言的什么命令可以取160G以上的硬盘的硬盘容量？？你知道吗？？

ltais

.版本 2
.支持库 spec

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

取磁盘空间 ()

.子程序 取磁盘空间
.局部变量 磁盘, 文本型
.局部变量 计次, 整数型
.局部变量 空间, 整数型

磁盘 ＝ “ACDEFGHJKL”
.计次循环首 (取文本长度 (磁盘), 计次)
    空间 ＝ 空间 ＋ 取磁盘总空间 (取文本中间 (磁盘, 计次, 1)) ÷ 1024
.计次循环尾 ()
空间 ＝ 空间 ÷ 1024
.如果 (空间 ＞ 160)  ' 这里的判断可能要修改一下（160GB的朋友再看一下是多少，嘿嘿）
    调试输出 (“硬盘空间大于160GB” ＋ 取空白文本 (4) ＋ “本磁盘空间为：” ＋ 到文本 (空间) ＋ “GB”)
.否则
    调试输出 (“硬盘空间小于160GB” ＋ 取空白文本 (4) ＋ “本磁盘空间为：” ＋ 到文本 (空间) ＋ “GB”)

借來的天堂

{:3_234:}我不知道  = =  {:3_221:}

冷情

楼上他妈的就是一天才，哈哈

xiji135

我很认同{:3_244:}

q987688232

我的硬盘快没空间了  我要挑战一下

jtg827

.版本 2

.DLL命令 GetLogicalDriveStrings, 整数型, "kernel32.dll", "GetLogicalDriveStringsA"
    .参数 nBufferLength, 整数型
    .参数 lpBuffer, 字节集, ,   


.版本 2
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 所有盘符, 字节集
.局部变量 盘符, 字节集, , "0"
.局部变量 返回值, 整数型
.局部变量 索引, 整数型
.局部变量 空间, 整数型

所有盘符 ＝ 取空白字节集 (256)
返回值 ＝ GetLogicalDriveStrings (256, 所有盘符)
所有盘符 ＝ 取字节集左边 (所有盘符, 返回值)
盘符 ＝ 分割字节集 (所有盘符, { 0 }, )
.计次循环首 (取数组成员数 (盘符), 索引)
    调试输出 (到文本 (盘符 [索引]))
    调试输出 (取磁盘总空间 (到文本 (盘符 [索引])) ÷ 1024 ÷ 1024)
    空间 ＝ 空间 ＋ 取磁盘总空间 (到文本 (盘符 [索引])) ÷ 1024 ÷ 1024
.计次循环尾 ()
调试输出 (“本硬盘空间为：” ＋ 到文本 (空间) ＋ “GB”)