|
|
|
Контроль ошибок подключения
|
|||
|---|---|---|---|
|
#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/topic.php?fid=58&msg=32015261&tid=2120115]: |
0ms |
get settings: |
11ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
42ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
50ms |
get tp. blocked users: |
2ms |
| others: | 255ms |
| total: | 396ms |
| 0 / 0 |
