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

Вниз

Socket. Восстановление связи.   Найти похожие ветки 

 
TButton ©   (2003-10-05 01:18) [0]


procedure TForm1.gateError(Sender: TObject; Socket: TCustomWinSocket;
ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
case ErrorEvent of
eeGeneral:
begin
if MessageDlg("Связь с сервером была потеряна. Восстановить?",mtWarning,[mbyes,mbNo],0)=mrNo
then Close
else
begin
gate.Close;
log("Система: Соединение прервано");
gate.Open;
end;

end;
eeSend:;
eeReceive:;
eeConnect:
begin
if MessageDlg("Произошел сбой при подключении к серверу."
+Chr(13)+"Повторить попытку?",mtWarning,[mbyes,mbNo],0)=mrNo
then Close
else
begin
gate.Close;
log("Система: Соединение прервано");
gate.Open;
end;
end;
eeDisconnect:;
eeAccept:;
else
end;
ErrorCode:=0;
end;

procedure TForm1.gateDisconnect(Sender: TObject; Socket: TCustomWinSocket);
begin
log("Система: Соединение прервано");
if MessageDlg("Связь с сервером была потеряна. Восстановить?",mtWarning,[mbyes,mbNo],0)=mrNo
then Close
else
begin
gate.Close;
log("Система: Восстанавливаем связь");
gate.Open;
end;

end;


внимание вопрос... :)
ситуация такая, в onError все нормально работает. А вот в onDisconnect - не очень, т.е. я убиваю сервак в клиенте случается дисконнект, выводится сообщения "потеряно соединение", задается вопрос, отвечаю "да", выводится "восстанавливаю соединение" и все. тишина. т.е. gate.Close и gate.Open выполняются, но при этом ничего (заметного) не происходит. т.е. сервера нет, по идее должен случиться еррор ееКоннект, но он не случается, вообщето еррор не случается вообще, это наводит на подозрение "а что-то здесь все-таки не так..." хотелось бы услашать мнения, может быть даже советы по етому поводу.


 
TButton ©   (2003-10-05 17:07) [1]

наверное тема не очень популярная...


 
Hogo ©   (2003-10-06 07:59) [2]

Может не надо коннектится в обработчике ошибок?


 
TButton ©   (2003-10-06 13:37) [3]

так не коннектится в дисконнекте. в обработчике ошибок все ровно.


 
Digitman ©   (2003-10-06 14:13) [4]

в обработчике OnDisconnect() запусти таймер
в обработчике таймера останови таймер и выполни gate.open


 
Hogo ©   (2003-10-07 06:42) [5]

Я делаю так-же как > Digitman , при дисконнекте запускаю таймер и через определенное время пытаюсь снова подключиться, надо еще на сервере обработать что клиент отвалился, для этого у меня они постоянно обмениваются сообщениями, типа говорят "я здесь" :)



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

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

Наверх




Память: 0.48 MB
Время: 0.008 c
6-11694
Vilux
2003-10-10 14:25
2003.12.04
Работа с сокетами


4-11746
wartar
2003-10-06 17:40
2003.12.04
Свой десктоп


6-11639
pavia
2003-10-09 22:01
2003.12.04
пОЧЕМУ ОШИБКИ


4-11719
MegaBass
2003-10-09 14:26
2003.12.04
Спец функции API


6-11670
xGhost
2003-10-07 13:25
2003.12.04
Проблема с подключением сетевого диска