![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Database Connect... [D5, MSSQL, MySQL]
amateur2002 © (2002-09-17 10:28:00)Помогите, плз., новичку корректно написать процедуру соединения с базой данных.
Суть проблемы: при недоступности базы данных или неверном логине (пароле) выдается ошибка EDBEngineError и все это добро зависает.
Я пробовал сделать что-то вроде:
try
Database1.Connected := True;
except
onEDBEngineError do
Exit;
end;
,но все-равно СНАЧАЛА выдается сообщение об ошибке, а потом уже выполняется exception...
Вопрос: как сделать так, чтобы получить код ошибки с возможностью дальнейшей обработки без вывода самой ErrorMsg?
Заранее благодарен!
amateur2002 (2002-09-17 11:52:00) [1]Все... Всем большое спасибо!
Johnmen (2002-09-17 11:47:00) [2]Ты уже ответил сам себе...:o))) см.amateur2002 (17.09.02 10:28)
amateur2002 (2002-09-17 11:41:00) [3]А-а-а-а. Все пошло!
Остался один вопрос: как получить код ошибки для последующей обработки и вывода?
Спасибо!
Johnmen (2002-09-17 11:33:00) [4]Все должно работать...
Именно try...
>Не из среды тоже Error
Какая ?
amateur2002 (2002-09-17 11:25:00) [5]Что-то никак... Не из среды тоже Error.
Может быть, кто-нибудь просто приведет кусок кода, который корректно открывает базу и, скажем закрывает, если она недоступна...
amateur2002 (2002-09-17 10:52:00) [6]Спасибо, попробую.
Johnmen (2002-09-17 10:51:00) [7]Галочку лучше оставить - пригодится.....:-)
Mike Kouzmine (2002-09-17 10:44:00) [8]Убери галочку останов по ексептион или запусти не из среды
amateur2002 (2002-09-17 10:37:00) [9]Да, из среды.
Mike Kouzmine (2002-09-17 10:32:00) [10]А ты запускаешь из среды?