Delphi-Help

Описание

function DirectoryExists ( const DirectoryName : string ) : Boolean;

Функция DirectoryExists возвращает True, если данный DirectoryName файл существует.
Каталог разыскивается в текущем каталоге.
False может быть возвращена, если пользователю не разрешено видеть файл.

Пример кода

var
dirName : String;
begin
// Создание нового каталога
dirName := 'Test Folder';
CreateDir(dirName);
// Теперь проверяем существует ли каталог
if DirectoryExists(dirName)
then ShowMessage(dirName+' существует')
else ShowMessage(dirName+' не существует');
// Удаление каталога и просмотр снова
RemoveDir(dirName);
if DirectoryExists(dirName)
then ShowMessage(dirName+' всё ещё существует!')
else ShowMessage(dirName+' больше не существует');
end;

Test Folder существует
Test Folder больше не существует

Примечание