WinAPI: GetDiskFreeSpace - 获取磁盘组织与容量信息
2008-02-11 14:55
495 查看
//声明: GetDiskFreeSpace( lpRootPathName: PChar; {磁盘根路径} var lpSectorsPerCluster: DWORD; {一个簇内的扇区数} var lpBytesPerSector: DWORD; {一个扇区内的字节数} var lpNumberOfFreeClusters: DWORD; {剩余簇数} var lpTotalNumberOfClusters: DWORD {总簇数} ): BOOL; //举例: procedure TForm1.FormCreate(Sender: TObject); var d1,d2,d3,d4: DWORD; begin GetDiskFreeSpace('C:',d1,d2,d3,d4); {以下只是显示} Memo1.Clear; with Memo1.Lines do begin Add(Format('一个簇内的扇区数: %d',[d1])); Add(Format('一个扇区内的字节数: %d',[d2])); Add(Format('剩余簇数: %d',[d3])); Add(Format('总簇数: %d',[d4])); Add(Format('剩余空间: %f GB',[d3/1024/1024/1024*d2*d1])); Add(Format('总空间: %f GB',[d4/1024/1024/1024*d2*d1])); end; end; //效果图:
相关文章推荐
- WinAPI: GetDiskFreeSpaceEx - 获取磁盘容量信息
- WinAPI: GetDiskFreeSpaceEx - 获取磁盘容量信息
- 文件磁盘相关函数[15]-获取磁盘空间信息 WinAPI:GetDiskFreeSpaceEx;
- 磁盘容量(GetDiskFreeSpace函数和GetDiskFreeSpaceEx函数)
- 获取磁盘类型及剩余空间 GetDiskFreeSpaceEx GetDriveTypeW GetVolumeInformation
- Obtaining Disk Space Information获取磁盘空间信息
- GetDiskFreeSpaceEx磁盘空间
- 获得磁盘剩余空间:GetDiskFreeSpaceEx
- 获取与一个磁盘的组织以及剩余空间容量有关的信息以及代码测试
- GetVolumeInformation获取磁盘信息与DeviceIoControl获取硬盘信息
- WinAPI: GetCharABCWidths - 获取 TrueType 字符的宽度信息
- GetDiskFreeSpaceEx函数
- 学习python获取系统信息和磁盘容量
- WinAPI: GetSystemMetrics - 获取系统度量等数值信息
- SqlServer如何通过SQL语句获取处理器(CPU)、内存(Memory)、磁盘(Disk)以及操作系统相关信息
- 获取磁盘容量信息
- 2014-06-06:IOCTL_STORAGE_GET_DEVICE_NUMBER获取磁盘信息如磁盘号、磁盘类型、分区号
- 获得当前目录的信息:dirname()、basename()、disk_free_space() 和 scandir()函数
- WinAPI: GetDriveType - 获取磁盘类型
- GetDiskSerial DLL获取硬盘信息