Как узнать, существует ли каталог? Можно воспользоваться функцией DirectoryExists, а можно: {любая function или procedure}if FindFirst(Dir+'*.*',faAnyFile,SearchRec)=-3 then //the Dir directory doesn't exist Copyright © "Мастера DELPHI" E-mail: delphi@mastak.com http://www.delphimaster.ru Источник получения информации: http://www.delphimaster.ru
{любая function или procedure}if FindFirst(Dir+'*.*',faAnyFile,SearchRec)=-3 then //the Dir directory doesn't exist