MkDir, процедура

Синтаксис


procedure MkDir(const Directory:  string);

Описание

Процедура MkDir служит для создания каталога. Если каталог не может быть создан, Delphi генерирует ошибку ввода/вывода с кодом ошибки Windows, например, Error_Already_Exists - если каталог уже существует.
Включать в имя каталога обратную косую черту не обязательно.
MkDir не является настоящей процедурой.

Ошибки

Советы и приемы

Пример


// Создаем каталог,  но только в том случае, если он
// еще не существует.
procedure MakeDirectory(const Directory:  string);
var
  Search:  TSearchRec;
begin
  if FindFirst(Directory,  faDirectory,  Search) = 0 then
    FindClose(Search)
  else
    MkDir(Directory);
end;

Смотрите также

Процедуры ChDir, GetDir, функцию lOResult, процедуру RmDir.
    Учебник по языку Pascal          Лабораторные работы по программированию          Справочник



2018-02-13 10:28:47

efeiuhfeihghiurhrqfjhihfihfrifrfrhfrrfhirhfhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh




Оставить комментарий:
Ваше Имя:
Email:
Антибот: *  
Ваш комментарий: