Не генерируется событие TDatabase.OnAfterDisconnect

← →
SergeyB © (2004-04-14 15:25) [0]

Помогите советом - не генерируется событие TDatabase.OnAfterDisconnect для TDatabase, которую я создаю в runtime. При разрыве соединеия (физическим отключением LAN) и поптыке писать в базу при помощи TQuery.ExecSQL() свойство TDatabase.Connected остается true.
!!! В такой же ситуации компонент на форме (т.е. сделанный в desingtime) генерирует сообщение, отличие по свойствам я не нашел.
Подскажите, как с этим бороться?
Спасибо

← →
Johnmen © (2004-04-14 15:45) [1]

Как назначается обработчик ? Код.

← →
SergeyB © (2004-04-14 15:55) [2]

Код такой:
Database.AfterDisconnect:=OnDBDisconnect;
где
procedure Txxx.OnDBDisconnect(Sender: TObject);
begin
...
end;

Но обрабочик вызвавается когда завершается программа.
Прошу обратить внимание, что Database.Connected остается равным true.
С чем это еще может быть связано?

> SergeyB © (14.04.04 15:55) [2]

Обработчик вызывается только тогда, когда проперть Connected устанавливается в False. Это и происходит при закрытии программы.
При физическом разрыве соединения этого не происходит.

Не генерируется событие TDatabase.OnAfterDisconnect Найти похожие ветки