Главная страница
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
14-54268
Darts
2003-02-28 12:29
2003.03.17
Перлы Буша Без комментариев.


9-53831
artgamer
2002-10-12 16:07
2003.03.17
Как сделать множество копий одного объекта?


14-54288
ProgrammerX
2003-02-28 22:15
2003.03.17
Нужны ActiveX , VCL


3-53928
Wizzard
2003-02-26 06:02
2003.03.17
Как сделать реверс-сортировку в TClientDataSet (без SQL)


3-53923
lamer_new
2003-02-26 11:30
2003.03.17
Привет помогите написать запрос !