Kod:
var bos_alan:Integer; begin bos_alan:=DiskFree(3); showmessage(IntToStr(bos_alan));