文件名称:Delphi 获取指定分区磁盘总空间(容量).rar
文件大小:7KB
文件格式:RAR
更新时间:2022-07-30 03:29:49
Delphi源码-系统相关
Delphi 获取指定磁盘分区(盘符)磁盘容量,或者空间大小,主要是使用DiskSize,把DiskSize获取到的数据进行转换,得出KB或GB,本代码主要是对磁盘容量大小的转换,让人更直观的了解到磁盘分区的大校转换过程如下: begin c := ord(DriveComboBox1.Drive); c := c-96; Ispare := DiskSize(c)/1024; SDir := 'KB'; if Ispare/1024>=1 then begin Ispare := Ispare/1024; SDir := 'MB'; if Ispare/1024>=1 then begin Ispare := Ispare/1024; SDir := 'G'; end; end; S := FormatFloat('0.0',Ispare); Edit1.Text := S SDir; end;
【文件预览】:
codesc.net
----DiskSize()
--------Unit1.ddp(51B)
--------Project1.res(876B)
--------Unit1.dcu(5KB)
--------Unit1.dfm(1KB)
--------Project1.cfg(434B)
--------Project1.dpr(188B)
--------Project1.dof(3KB)
--------Unit1.pas(1KB)