Главная страница
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.013 c
4-52006
MFV
2002-11-03 23:40
2002.12.16
ProgressBar в ресурсном диалоге


14-51946
Кен
2002-11-21 03:10
2002.12.16
Как конвертировать DLL в Дельфи? Чтобы можно было чуть чуть подпр


1-51760
AiratX
2002-12-04 19:06
2002.12.16
Как сделать невидимой форму (Application) на Tesk Bare ?


3-51598
Jack
2002-11-27 19:20
2002.12.16
DB и потоки


3-51615
Shaman
2002-11-26 17:06
2002.12.16
Автоинкрементные поля - как с ними работать ч-з TSimpleDataSet