Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.05;
Скачать: CL | DM;

Вниз

Как проверить связь с сервером?   Найти похожие ветки 

 
Ш-К   (2003-05-14 21:00) [0]

В событии FormCloseQuery ставлю, например, такой код:

IBTransaction1.StartTransaction;
IBTransaction1.Commit;

Если во время работы программы произошел дисконнект с ИВ, то программу невозможно будет закрыть.
Будет постоянно вылетать:
"connection lost to database"

Как проверять связь с сервером?


 
Senator ©   (2003-05-15 10:38) [1]

Использовать FIBPlus компоненты, там есть возможность отловить и обработать потерю связи


 
Ш-К   (2003-05-15 13:26) [2]

А без FIBPlus?


 
AlexSerp ©   (2003-05-15 14:11) [3]

В procedure TForm1.AppException(Sender: TObject; E: Exception), объявленной в приложении заранее

procedure TFrmMDImain.AppException(Sender: TObject; E: Exception);
begin
if pos("connection lost to database", E.message)>0 then
begin
ShowMessage("Потеряна связь с сервером! Попробуйте еще раз." +#13
+"Если не получается закройте программу или перезагрузите компьютер.");
DB.Connected :=False;
DB.Connected :=True;
exit;
end;
showmessage("Возникла ошибка со следующим сообщением !!! "+E.message);
end;



 
Ш-К   (2003-05-15 23:10) [4]

Тоже вариант. Можно построить логику программы на переваривании Exception.

Но реально ли все-таки или проверять своеручно, или ловить дисконект еще до исключения?



Страницы: 1 вся ветка

Текущий архив: 2003.06.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
1-13232
Dimedrol
2003-05-27 12:31
2003.06.05
Cannot load package !


14-13446
Style
2003-05-07 23:29
2003.06.05
Delphi Challenge: Judge Client - програмулька для судейства.


9-12984
konstantionov
2002-12-27 23:25
2003.06.05
Статистика игроков


11-13112
Grande
2002-08-29 16:01
2003.06.05
MCK не компиллируется под Delphi7


3-13058
noteens
2003-05-15 19:40
2003.06.05
TDBGrid