如何得到硬盘的每个分区的大小、剩余空间。急！！！(50分)

如题！

用GetDiskFreeSpace<br>procedure Tform1.button1click(sender:Tobject);<br>var<br>&nbsp; driverchar;<br>&nbsp; sec1,byt1,cl1,cl2:longword;<br>begin<br>&nbsp; driver:=pchar('c:');<br>&nbsp; GetDiskFreeSpace(driver,sec1,byt1,cl1,cl2);<br>&nbsp; cl1:=cl1*sec1*byt1;{cl1中包含驱动器的总容量，cl2中包含驱动器的可用容量}<br>&nbsp; cl2:=cl2*sec1*byt1;<br>end;<br>

DiskFree,DiskSize<br>具体用法见Delphi帮助

多人接受答案了。