Проверка подключения к SqlServer - БД в Delphi

mental · 29.08.2011, 14:32

Подскажите код для проверки подключения к Sql Server через AdoConnection и куда лучше его повесить? А то когда сервер останавливаешь программа начинает спамить об ошибки и можно её закрыть только через диспетчер.

Stilet · 29.08.2011, 15:01

Цитата:

программа начинает спамить об ошибки

На каком этапе? Что происходит в коде при ошибке?
Я к чему - у меня много программ по работе с сиквелом, и я всегда пишу программы так чтоб они перехватывали ошибки и обрабатывали их, но не проверяли никакого подключения.

fbus · 29.08.2011, 15:04

try
ADOConnection1.Connect;
except
Showmessage('Ахтунг! Алерт! Не смог подключиться');
abort;
end;
Showmessage('Подключение успешно');

а в обработчике On connecterror можешь поставить application.terminate;

Stilet · 29.08.2011, 17:14

Цитата:

fbus

А если связь рвется во время работы? Тут уже нужно по другому действовать.

mental · 30.08.2011, 11:26

http://pixs.ru/showimage/.bmp_6619868_2812258.jpg
Вот такая ошибка, если подключение рвётся.

ReportCube · 30.08.2011, 22:27

Нет, это не из-за подключения такая ошибка. Скорее всего - это попытка обратиться к результатам пустого запроса, который равен NIL при ошибке подключения. Надо сделать пустышку - хранимую процедуру. При удачном выполнении - есть подключение, в противном случае выход по except и попытка нового подключения...

mental · 26.09.2011, 12:17

Пример можно какой-нибудь?

29.08.2011, 14:32	#1
mental Пользователь Регистрация: 07.01.2009 Сообщений: 36	Проверка подключения к SqlServer Подскажите код для проверки подключения к Sql Server через AdoConnection и куда лучше его повесить? А то когда сервер останавливаешь программа начинает спамить об ошибки и можно её закрыть только через диспетчер. мой блог о финансах

30.08.2011, 11:26	#5
mental Пользователь Регистрация: 07.01.2009 Сообщений: 36	http://pixs.ru/showimage/.bmp_6619868_2812258.jpg Вот такая ошибка, если подключение рвётся. мой блог о финансах

26.09.2011, 12:17	#7
mental Пользователь Регистрация: 07.01.2009 Сообщений: 36	Пример можно какой-нибудь? мой блог о финансах

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
ПроВерка Подключения	&RiU	Общие вопросы Delphi	8	18.10.2011 05:45
проверка подключения к Интернет	Noor	Работа с сетью в Delphi	9	13.07.2011 01:44
Проверка подключения ADOConnection	ercartman	БД в Delphi	6	31.08.2010 14:51
Проверка подключения	Shouldercannon	Общие вопросы Delphi	4	11.08.2008 14:41
Проверка подключения к интернету	badfilin	Общие вопросы C/C++	9	28.03.2008 02:27

29.08.2011, 15:04	#3
fbus Форумчанин Регистрация: 23.10.2008 Сообщений: 460	try ADOConnection1.Connect; except Showmessage('Ахтунг! Алерт! Не смог подключиться'); abort; end; Showmessage('Подключение успешно'); а в обработчике On connecterror можешь поставить application.terminate;

30.08.2011, 22:27	#6
ReportCube Форумчанин Регистрация: 11.03.2011 Сообщений: 426	Нет, это не из-за подключения такая ошибка. Скорее всего - это попытка обратиться к результатам пустого запроса, который равен NIL при ошибке подключения. Надо сделать пустышку - хранимую процедуру. При удачном выполнении - есть подключение, в противном случае выход по except и попытка нового подключения...