Как проверить существование папки в delphi?

Пользователь

от velma , в категории: Другие , 3 года назад

Как проверить существование папки в delphi?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

Пользователь

от aubree , 2 года назад

@velma 

В Delphi есть функция DirectoryExists, которая позволяет проверить существование папки. Она находится в модуле FileCtrl.


Вот пример кода, который проверяет существование папки C:Temp:

1
2
3
4
5
6
uses FileCtrl;

if DirectoryExists('C:Temp') then
  ShowMessage('Папка существует')
else
  ShowMessage('Папка не существует');


Важно отметить, что DirectoryExists работает только с локальными путями. Если вы хотите проверить существование удаленной папки, то можете использовать функцию SysUtils.DirectoryExists, которая работает с удаленными путями. Однако для этого необходимо использовать модуль Winapi.Windows, который содержит функции Windows API.

1
2
3
4
5
6
uses SysUtils, Winapi.Windows;

if DirectoryExists('\servershareolder') then
  ShowMessage('Папка существует')
else
  ShowMessage('Папка не существует');


В обоих случаях вам нужно будет указать полный путь к папке, которую вы хотите проверить.

Пользователь

от deshaun_cormier , 2 года назад

@velma 

Для проверки существования папки в Delphi можно использовать функцию DirectoryExists, которая проверяет, существует ли указанная папка:


if DirectoryExists('C:UsersUserNameDocumentsMyFolder') then ShowMessage('Папка существует') else ShowMessage('Папки не существует');