|
|
|
Контроль ошибок подключения
|
|||
|---|---|---|---|
|
#18+
Delphi5+ADO+MS SQL Надо чтобы при запуске программы когда связи с сервером нет программа выдавала сообщение и закрывалась. У меня в первой форме TADOConnection проверяю возможность подключения если невозможно делаю Application.Terminated А программа все равно продолжает создавать оставшиеся модули и соответственно выдает ошибки подключения. Как и где контролировать подключение? Подскажите пожалуйста. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.10.2001, 16:08 |
|
||
|
Контроль ошибок подключения
|
|||
|---|---|---|---|
|
#18+
Могу немножко ошибится, у меня дома нет исходников. 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; Все работает без проблем. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.10.2001, 17:55 |
|
||
|
|
start [/forum/search_topic.php?author=Alex_SPD&author_mode=last_topics&do_search=1]: |
0ms |
get settings: |
9ms |
get forum list: |
21ms |
get settings: |
10ms |
get forum list: |
16ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
34ms |
get topic data: |
10ms |
get forum data: |
3ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 422ms |
| total: | 564ms |
| 0 / 0 |
