Как определить размер свободного места на диске
Автор: Акулов Николай 
Tweet
Для получения размера свободного места на дисках, ёмкость которых больше 2Гб, необходимо использовать функцию GetDiskFreeSpaceEx. Ниже приведён небольшой пример использования данной функции:
var
Free_Bytes: TLargeInteger;
FreeSize: TLargeInteger;
TotalSize: TLargeInteger;
begin
GetDiskFreeSpaceEx('c:', Free_Bytes, Totalsize, @FreeSize);
end;
Результатом будет значение в байтах.
Источник: delphiworld.narod.ru
Просмотров: 5644
Copyright © 2008 - 2018 Программирование на Delphi для начинающих и не только.
Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам.
Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации.