if createdir('C:\Твоя директория') then showmessage('Директория существует!') else showmessage('Директории не существует!'); createdir('Твоя директория');