Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Socket первое соединение [D5, Win95/98]

romychk © (2002-12-13 10:54:00)
У меня не получаетсы соединиться по сокету, при первом соединении выдает ашибку, хотя во второй раз уже все нормально работает, соединение, отправка, и дисконект в одной процедуре, просто так надо :)

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;

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

romychk (2002-12-20 12:49:00) [1]
Что поменять?
И почему с первого раза сокеты не соединяются, а 2,3,4... все хорошо?

mrcat (2002-12-20 12:31:00) [2]
>> Почему при соединении к СерверСокет в указаном примере, виндовс хочет установить соединение по модему?????

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

romychk (2002-12-20 12:12:00) [3]
Почему при соединении к СерверСокет в указаном примере, виндовс хочет установить соединение по модему?????

romychk (2002-12-15 10:01:00) [4]
Что ВЫ посоветуете сменить, в моем коде для того, чтобы он лучше работал?

ole (2002-12-14 11:53:00) [5]
Я у себя в программе использую даже такой код:
ClientSocket1.Active:=True;
ClientSocket1.Active:=False;
Что это дает?
а у меня еще есть OnConnect, где идет отправка сообщения.
так что успевает все сделать и соединиться и отсоединиться и отправить... и без ошибок.
Правда на всякий случай в OnError
ErrorCode:=0;

:)

romychk (2002-12-14 00:38:00) [6]
А что Вы посоветуетек, что бы хорошо работало?

SH@DOW (2002-12-13 13:18:00) [7]
ClientSocket1.close плохо работает

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »