Delphi 获取指定分区磁盘总空间(容量).rar

时间:2022-07-30 03:29:49
【文件属性】:
文件名称: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)

网友评论