Описание |
Процедура ChDir выполняет переход в указанный диск и папку, в которой будет производиться работа.
В данной процедуре необходимо указывать полный адрес папки.
Если искомой директории не существует, то происходит ошибка - ElnOutError. И директория остаётся неизменённой.
|
|
Похожие команды |
| |
|
Пример кода : Получение и установка каталога в диск C: |
var
directory : string;
begin // Получение каталога для диска
C
GetDir(2, directory);
ShowMessage('Каталог диска C, по умолчанию = '+directory);
// Установка каталога C в это
значение
ChDir(directory);
GetDir(2, directory);
ShowMessage('Каталог диска C, по умолчанию = '+directory);
// Попытка установить в недопустимое
значение
ChDir('C:Bad/Path/Value');
GetDir(2, directory);
ShowMessage('Каталог диска C, по умолчанию = '+directory);
end;
|
Следующий вывод будет изменяться на различных PC:
C:\Program Files\Borland\Delphi7\Projects
C:\Program Files\Borland\Delphi7\Projects
ElnOutError with error 'Invalid file name'
|
|