Как определить размер свободного места на диске

Delphi , Файловая система , Диски

Для получения размера свободного места на дисках, ёмкость которых больше 2Гб, необходимо использовать функцию GetDiskFreeSpaceEx. Ниже приведён небольшой пример использования данной функции:

var
  FreeBytesAvailableToCaller: TLargeInteger;
  FreeSize: TLargeInteger;
  TotalSize: TLargeInteger;
begin
  GetDiskFreeSpaceEx('c:',
    FreeBytesAvailableToCaller,
    Totalsize,
    @FreeSize);
end;

Результатом будет значение в байтах.

Статья Как определить размер свободного места на диске раздела Файловая система Диски может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

:: Главная :: Диски ::