Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  

форум программистов

Основы Delphi
MkDir
Процедура
Создаёт каталог System unit
  procedure MkDir ( const DirectoryName : string ) ;
Описание
Процедура 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;
Каталог создался успешно
 


Оплата за обучение в Kata Academy только после твоего трудоустройства в IT, начни карьеру Middle Java-разработчика



Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки? Slurm подготовили для вас особенный продукт!





форум программистов


© Форум Delphi  |  Форум Pascal   |  Блог программистов   |  Исходники Delphi   |  Автор сайта  |  Ссылки   |  Английская версия