| Описание |
|
Процедура MkDir создает новый каталог в текущем каталоге.
Если каталог уже существует, выдаётся исключение EInOutError.
Вы можете избежать такого исключения, предотвращая ошибки IO, используя директиву компилятора {$IOChecks Off}. Тогда вы должны сами проверять значение IOResult, чтобы видеть результат выполнения вашей операции ввода/вывод (помните, что использование IOResult сбрасывает значение).
|
|
| Похожие команды |
$IOChecks
ChDir Выбор диска и директории ( папки ), в которой будет производиться работа
CreateDir Создаёт директорию
GetCurrentDir Возвращает текущий каталог (диск плюс каталог)
GetDir Получает текущий каталог (диск плюс путь) для указанного диска.
IOResult Содержит возвращаемый код последней операции ввода/вывода
RemoveDir Позволяет удалить директорию
RmDir Удаление каталога
SelectDirectory Выводит диалоговое окно, с помощью которого пользователь может выбрать директорию
SetCurrentDir Изменяет текущую директорию
ForceDirectories Создаёт новый путь каталогов
| |
|
| Пример кода : Создание каталога и затем его удаление |
var
error : Integer;
begin
// Попытка создать новый подкаталог в текущем каталоге
// Выключение проверки ошибок I/O
{$IOChecks off}
MkDir('TempDirectory');
// Создание каталого прошло успешно?
error := IOResult;
if error = 0
then ShowMessage('Каталог создался успешно')
else ShowMessageFmt('Создание каталога провалилось с ошибкой %d',[error]);
// Удаление каталога для очистки
RmDir('TempDirectory');
{$IOChecks on}
end;
|
Каталог создался успешно
|
|
