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

Вниз

Передача текста через Tserversocket & TclientSocket ПЛИЗЗ ХЕЛП!!!   Найти похожие ветки 

 
dimich1978 ©   (2003-01-25 15:15) [0]

Мастера плиз помогите запутавшемуся разобраться.
Дело в том что, я никак немогу разобраться с такой ситуацией.
Если клиент отсылает сообщение один раз то все проходит нормально, если же приходится отсылать несколько строк, именно несколько, например:
clientsocket1.Socket.SendText("Привет 1");
clientsocket1.Socket.SendText("Привет 2");
clientsocket1.Socket.SendText("Привет 3");
clientsocket1.Socket.SendText("Привет 4");
То эти строки плюсуются друг к другу и сервер получает:
s:=socket.receiveText;
типа "Привет 1Привет 2Привет 3Привет 4", как можно сделать чтобы сервер принял эти данные в последовательности, а не в сумме.
И еще если поставить временную задержку, то в принципе это срабатывает, но это как мне кажется код с "не человеческим" лицом.
И еще я не понимаю кстати почему ставя задержку sleep(500) все проходит, хотя это думаю от сети зависит?
Если можно или разложите мне по полочкам что все же происходит когда передаются несколько строк , а лучше помогите кодом.
Заранее всем благодарен!!! Пожалуйста помогите!!!


 
neodiX ©   (2003-01-25 18:51) [1]

Дело в том, что функция SendText не посылает данные, а помещает их во временный сис. буфер, который, как только есть квант свободного проц. времени, пытается отослать данные. Размер буффера можно менять фукнцией setsockopt. Т.к. у тебя четыре фукнции выполняются подряд, то получается, что буффер успевает только наполнятся (так как ты не даешь ему время на отчистку), а как только ты закончил наполнять буффер, все данные из него уже на сомом деле посылаются. Теперь ты понял почему все работает когда ты ставишь задержку.
Так же советую посетить вот эти ссылки, на мои топики с мастерами, на подобные темы:

http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1042410307&n=4
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1039282160&n=4


 
VID ©   (2003-01-26 23:43) [2]

Этот вопрос стар как мир:
найдёшь 100% решение здесь:

http://delphibase.endimus.com/?action=viewfunc&topic=nettransfer&id=10335


 
dimich1978 ©   (2003-01-27 08:42) [3]

Всем огромное спасибо, будем разбираться



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
6-54147
msoftware
2003-01-27 08:33
2003.03.17
Вопрос по защите информации


1-53960
кашуба
2003-03-03 16:25
2003.03.17
TStringGrid


1-53991
w666w
2003-03-06 13:00
2003.03.17
Virtual ListView - баг или кривые руки?


8-54120
boolean
2002-12-04 10:36
2003.03.17
Мастера, подскажите


14-54298
ig
2003-02-27 21:21
2003.03.17
Ищу DbGrid, в стиле гридов 1С