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