Описание
Функция создает новый каталог.
В случае успешного выполнения функция возвращает True, а иначе - False.
Пример If CreateDir( 'C:\NEWDIR') then MessageDlg('Каталог создан', mtInformation, [mbOk],0) else MessageDlg('Невозможно создать каталог', mtInformation, [mbOk], 0);