![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сокеты. Дождаться завершения 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;