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

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

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

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

 
faq/delphi/system/get_free_disk_space.txt · Последние изменения: 2006/05/14 14:39 (внешнее изменение)
 
Recent changes RSS feed Donate Powered by PHP Valid XHTML 1.0 Valid CSS Driven by DokuWiki