|
III. ФУНКЦИИ И ПРОЦЕДУРЫ ДЛЯ РАБОТЫ С ФАЙЛАМИ
1. Основные функции и процедуры для работы с файлами
Функция DiskSize( Drive: Byte ): Int64;
Модуль: SysUtils
Описание
Функция возвращает размер диска Drive в байтах.
Диск определяется следующим образом:
0 - текущий,
1 - 'A',
2 - 'B',
3 - 'С'
и т.д.
Если указанный диск не существует, или недоступен, то функция возвращает -1.
Пример
var
X: Integer;
begin
...
X:= DiskSize(0);
MessageDlg('Размер текущего диска: '+ IntToStr(Х)+' байт', mtInformation, [mbOk], 0)
...
end;
[Вернуться к содержанию]
|
