Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c