Процедура ProcessPath в Delphi створює каталог.
System unit
procedure MkDir (const DirectoryName : string);
Процедура MkDir створює новий каталог у поточному каталозі. Якщо каталог вже існує, видається EInOutError. Ви можете уникнути такого виключення, запобігаючи помилкам IO, використовуючи директиву компілятора {$IOChecks Off}. Тоді ви повинні самі перевіряти значення IOResult, щоб бачити результат виконання вашої операції введення/виведення (пам'ятайте, що використання IOResult скидає значення).
Процедура MkDir: Створення каталогу та його видалення
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;Результат
Каталог створився успішно
Подібні функції, процедури та команди
$IOChecks — коли включено, помилка операції введення-виведення викликає виняток.
ChDir — вибір диска та директорії (папки), в якій проводитиметься робота.
CreateDir — створює директорію.
GetCurrentDir — повертає поточний каталог (диск плюс каталог).
GetDir — отримує поточний каталог (диск плюс шлях) для вказаного диска.
IOResult — містить код останньої операції введення/виводу, що повертається.
RemoveDir — дозволяє видалити директорію.
RmDir — видалення каталогу.
SelectDirectory — виводить діалогове вікно, за допомогою якого користувач може вибрати директорію.
SetCurrentDir — змінює поточну директорію.
ForceDirectories — створює новий шлях каталогів.
Пригостити автора кавою