Delphi FAQ >> Файлы и каталоги
uses FileCtrl;
...
if DirectoryExists(DirName) then
ShowMessage('Директория ' + DirName + ' существует');
Ссылки в тему:
Проверка существования директории (способ 1)
Программирование на Delphi и не только
Сайт для Delphi программиста
Delphi FAQ >> Файлы и каталоги
uses FileCtrl;
...
if DirectoryExists(DirName) then
ShowMessage('Директория ' + DirName + ' существует');
Ссылки в тему:
Проверка существования директории (способ 1)