GetFreeDiskSpace

Функция GetFreeDiskSpace() возвращает текущее значение свободного пространства на диске в мегабайтах.

GetFreeDiskSpace(Drivepath:String):Variant

Drivepath:String — имя диска в системе.

Пример вызова:
{Pascal Script}
Var
res: Variant;

Begin
res := GetFreeDiskSpace('C:\');
AddToDebugLog('Размер диска С = ' + floatToStr(res));
end.