函數(shù)原型：

   BOOL GetDiskFreeSpace(

   LPCTSTR lpRootPathName，

   LPDWORD lpSectorsPerCluster，

   LPDWORD lpBytesPerSector，

   LPDWORD lpNumberOfFreeClusters，

   LPDWORD lpTotalNumberOfClusters

   )；

   參數(shù)說(shuō)明：

   1.lpRootPathName：指定測(cè)試驅(qū)動(dòng)器的根目錄的名稱(chēng)。為null時(shí)，則為當(dāng)前目錄所在驅(qū)動(dòng)器的根目錄名稱(chēng)。

   2.LpSectorsPerCluster：取得驅(qū)動(dòng)器每簇的扇區(qū)數(shù)。

   3.LpBytesPerSector：取得驅(qū)動(dòng)器每扇區(qū)的字節(jié)數(shù)。

   4.LpNumberOfFreeClusters：磁盤(pán)剩余空間的簇?cái)?shù)。

   5.LpTotalNumberOfClusters：磁盤(pán)總空間的簇?cái)?shù)。

   應(yīng)用舉例：

   顯示磁盤(pán)空間的總?cè)萘浚Ｓ嗳萘俊?/p>

1) 在上例基礎(chǔ)上，添加兩個(gè)edit組件和兩個(gè)label組件，如

2) 在combobox組件的onchange 事件相應(yīng)部分添加如下內(nèi)容：

   val

   disktotal,diskfree,cl1,cl2,sec1,byt1:longword;

   begin

   Getdiskfreespace(pchar(combobox1.Items[combobox1.Itemindex]),sec1,byt1,cl1,cl2);//獲取磁盤(pán)信息

   Diskfree:=cl1*sec1*byt1;//剩余容量=剩余簇?cái)?shù)*每簇扇區(qū)數(shù)*每扇區(qū)字節(jié)數(shù)

   disktotal:=cl2*sec1*byt1;//總?cè)萘?磁盤(pán)總簇?cái)?shù)*每簇扇區(qū)數(shù)*每扇區(qū)字節(jié)數(shù)

   edit2.text:=formatfloat(''###,##0'',total);

   edit3.text:=formatfloat(''###,##0'',freesp);

   end;