Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.10.2009, 23:21   #1
Владимирx
 
Регистрация: 27.12.2007
Сообщений: 5
Восклицание Обработка ошибок EInOutError

Читаю из файла значение путь к каталогу..

Readln(myFile, text);
DirectoryListBox3.Directory:=text;

и если диска который указан в пути не существует выдает стандартный маседж Invalid Filename .

Подскажите плиз как сделать чтоб стандартный меседж не выходил ,а появлялась моя форма с моим уведомлением об ошибке.
Заранее спасибо!

п.с пробывал разобраться с EInOutError неполучилось(
Владимирx вне форума Ответить с цитированием
Старый 09.10.2009, 23:24   #2
Вавел из ГМТУ
Форумчанин
 
Регистрация: 19.06.2009
Сообщений: 896
По умолчанию

Есть как минимум два способа:

1. Функции типа FileExists и пр.
2. Блок Try Except.

В первом случаее перед попыткой воспользоваться файлом осуществляем проверку существование файла.
Во втором случаем мы помещаем "проблемный" код в эту структуру и если там появиться ошибка, то сработает специальный код.
Вавел из ГМТУ вне форума Ответить с цитированием
Старый 09.10.2009, 23:27   #3
uberchel
Участник клуба
 
Аватар для uberchel
 
Регистрация: 19.01.2009
Сообщений: 1,472
По умолчанию

Значит делайте свою проверку на существован6ия пути:
Код:
if not DirectoryExists() then
// Делаем что то если дериктории нет
else
//Делаем что то если она есть
uberchel вне форума Ответить с цитированием
Старый 09.10.2009, 23:57   #4
Владимирx
 
Регистрация: 27.12.2007
Сообщений: 5
По умолчанию

Цитата:
Сообщение от uberchel Посмотреть сообщение
Значит делайте свою проверку на существован6ия пути:
Код:
if not DirectoryExists() then
// Делаем что то если дериктории нет
else
//Делаем что то если она есть
плиз можно поподробней конкретно для моего кода
ато я в делфи начинающий(

Readln(myFile, text);
DirectoryListBox4.Directory:=text;
читает строчку из обычного тхт файла типо H:\Soft\
Владимирx вне форума Ответить с цитированием
Старый 10.10.2009, 00:06   #5
Владимирx
 
Регистрация: 27.12.2007
Сообщений: 5
По умолчанию всем большое спасибо заработало

всем большое спасибо заработало
Владимирx вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Delphi обработка ошибок world12_tk Помощь студентам 3 20.09.2009 14:58
Обработка ошибок Liones БД в Delphi 12 04.12.2008 07:22
Обработка ошибок Ivanich JavaScript, Ajax 1 24.04.2008 22:49
Обработка ошибок в Delphi 7 Наташкин БД в Delphi 3 21.12.2007 22:07
Обработка ошибок. Serviceprofi Помощь студентам 7 19.11.2007 15:12