Socket первое соединение

← →
romychk (2002-12-13 10:54) [0]

У меня не получаетсы соединиться по сокету, при первом соединении выдает ашибку, хотя во второй раз уже все нормально работает, соединение, отправка, и дисконект в одной процедуре, просто так надо :)

if ClientSocket1.Active then ClientSocket1.Close;
i:=GetTickCount;
While (100+i>GetTickCount) do Application.ProcessMessages;
ClientSocket1.Host:=Ip;
ClientSocket1.Port:=StrToInt(Port);
ClientSocket1.Open;
i:=GetTickCount;
While (1000+i+KilKomp*100>GetTickCount) And (Not ClientSocket1.Active) do Application.ProcessMessages;

i:=GetTickCount;
While (100+i>GetTickCount) do Application.ProcessMessages;

ClientSocket1.Socket.SendText(s);
ClientSocket1.Close;

i:=GetTickCount;
While (100+i>GetTickCount) do Application.ProcessMessages;

Подскажите, что не так

← →
SH@DOW (2002-12-13 13:18) [1]

ClientSocket1.close плохо работает

← →
romychk (2002-12-14 00:38) [2]

А что Вы посоветуетек, что бы хорошо работало?

← →
ole (2002-12-14 11:53) [3]

Я у себя в программе использую даже такой код:
ClientSocket1.Active:=True;
ClientSocket1.Active:=False;
Что это дает?
а у меня еще есть OnConnect, где идет отправка сообщения.
так что успевает все сделать и соединиться и отсоединиться и отправить... и без ошибок.
Правда на всякий случай в OnError
ErrorCode:=0;

:)

← →
romychk (2002-12-15 10:01) [4]

Что ВЫ посоветуете сменить, в моем коде для того, чтобы он лучше работал?

← →
romychk (2002-12-20 12:12) [5]

Почему при соединении к СерверСокет в указаном примере, виндовс хочет установить соединение по модему?????

← →
mrcat (2002-12-20 12:31) [6]

>> Почему при соединении к СерверСокет в указаном примере, виндовс хочет установить соединение по модему?????

причем тут WinSocket?! Меняйте свои настройки соединения в Windows

← →
romychk (2002-12-20 12:49) [7]

Что поменять?
И почему с первого раза сокеты не соединяются, а 2,3,4... все хорошо?

Socket первое соединение Найти похожие ветки