Indy и TIdIOHandlerSocket

← →
BlackSun © (2003-12-17 13:20) [0]

Подскажите пример отправки данных через сокет (IdIOHandlerSocket)? Особенно интересует процедура ConnectClient, какие в нее данные помещать? Хелп читал, но не совсем понял...
Если в простом сокете я делал так,

procedure sender(str:string);
var
I1: integer;
begin
for I1:=1 to Length(str) do
if send(sock2, str[I1] , 1, 0) = SOCKET_ERROR then
begin
writelog("Ошибка отправки через сокет",pnum);
exit;
end;
end;
.........
postinf:="....";
st:="POST http://www.site.ru HTTP/1.0"+#13+#10;
st:=st+"Content-Type: application/x-www-form-urlencoded"+#13+#10;
st:=st+"Host: www.site.ru"+#13+#10;
st:=st+"Content-Length: "+inttostr(length(postinf))+#13+#10;
st:=st+#13+#10;
st:=st+postinf+#13+#10;
sender(st+#13+#10);

то как это сделать в Indy? Заранее спасибо...

← →
BlackSun © (2003-12-17 16:43) [1]

Да и еще такой вопрос, если не обращаться к Indy. Написал многопоточнуюб прогу, которая юзает сокеты. Так вот через некоторое время некоторые потоки зависают... соответственно скорость падает. Можно ли как-то реализовать функцию таймаута на сокетах?

Indy и TIdIOHandlerSocket Найти похожие ветки