Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Сокеты. Дождаться завершения send? [D7, WinXP]


Signate ©   (2006-12-06 07:21:00) 

Как нибудь можно узнать завершилась команда или нет?
Почему код на подобии

 sock.SendString('GET / HTTP/1.0');
 sleep(100);
 sock.SendString('Host: www.ya.ru');
 sleep(100);
 sock.SendString('');
 sleep(100);

работает,  а

 sock.SendString('GET / HTTP/1.0');
 sock.SendString('Host: www.ya.ru');
 sock.SendString('');

нет?


Сергей М.   (2006-12-07 08:25:00) [1]

А что значит "код не работает" ?


Anatoly Podgoretsky   (2006-12-06 15:58:00) [2]

> Signate  (06.12.2006 15:09:03)  [3]

Тогда ничего не надо делать, это следующая в программе строка.


Signate   (2006-12-06 15:09:00) [3]

Забыл сказать... режим блокирующий.


Сергей М.   (2006-12-06 08:25:00) [4]

режим какой ? неблокирующий ?


Signate   (2006-12-06 07:23:00) [5]

procedure TSock.SendString(const aString : string);
var
 str : pchar;
 len : int;
begin
 str := pchar(aString + CRLF);
 len := length(str);
 send(Sock,str^,len,0);
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо