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

Вниз

определить возможность подключения clientsocket к serversocket   Найти похожие ветки 

 
izhalex ©   (2002-10-07 18:00) [0]

Привет всем!
Возникла проблема
определяю возможность подключения clientsocket"a к serversocket"y
включая каждый раз по таймеру
ClientSocket1.Active:= true;
и в случае неуспеха обрабатываю событие ClientSocket1.OnError
Почему-то приложение-клиент с каждым разом увеличивается в опер. памяти и через некоторое время (после ~3870 вызова OnTimer) все вылетает. Объясните почему? Или опрашивать по-другому?


 
VID ©   (2002-10-07 19:38) [1]

обработай событие onError у клиентского сокета
Client.Socket.Disconnect(Socket.SocketHandle);


 
izhalex ©   (2002-10-07 20:07) [2]

а поконкретнее можно плз


 
VID ©   (2002-10-08 16:14) [3]

Чувствую я, что под "поконкретнее" ты имеещь ввиду это:
Пусть Client:TClientSocket; //Компонент с помощью которого ты подключаешься к серверу.

procedure TForm1.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
Client.Socket.Disconnect(Socket.SocketHandle);
end;


 
VID ©   (2002-10-08 16:15) [4]

ClientSocket1 = Client


 
izhalex ©   (2002-10-08 18:54) [5]

great thanx надо попробовать


 
alex_ustasu ©   (2002-10-22 11:46) [6]

Привет, Коллеги. А как вы перехватываете ошибку, если сервер неактивен ? Никак не могу с этим справиться. OnClientSocketError не срабатывает в этом случае, try ...except тоже.



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

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

Наверх




Память: 0.48 MB
Время: 0.021 c
14-51919
Pan
2002-11-25 12:17
2002.12.16
Не могу попасть в regedit (win98)


3-51650
Cranium
2002-11-28 19:53
2002.12.16
IBStoredProc ругается на парметр


1-51686
avsh
2002-12-05 20:04
2002.12.16
TImage


14-51968
TTCustomDelphiMaster
2002-11-22 23:06
2002.12.16
Водка & Пиво


1-51778
Tundra
2002-12-04 06:44
2002.12.16
Мигание компонента