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 Лабораторные работы по программированию Справочник
  |