Гость
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Контроль ошибок подключения / 2 сообщений из 2, страница 1 из 1
12.10.2001, 16:08
    #32015261
Michael
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Контроль ошибок подключения
Delphi5+ADO+MS SQL

Надо чтобы при запуске программы когда связи с сервером нет
программа выдавала сообщение и закрывалась.
У меня в первой форме TADOConnection
проверяю возможность подключения если невозможно делаю Application.Terminated
А программа все равно продолжает создавать оставшиеся модули и соответственно
выдает ошибки подключения.

Как и где контролировать подключение? Подскажите пожалуйста.
...
Рейтинг: 0 / 0
12.10.2001, 17:55
    #32015262
Виктор Светлов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Контроль ошибок подключения
Могу немножко ошибится, у меня дома нет исходников.
procedure TDTM.DataModuleCreate(Sender: TObject);
begin
with ADOConn do begin
try
Connected:=true;
except
MyMessage(true,'', Format(strNotServerResponding,[Host]), MB_ICONERROR);
Application.Terminate;
end;
end;
end;

Все работает без проблем.
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Контроль ошибок подключения / 2 сообщений из 2, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]