Форум: "Сети";
Текущий архив: 2008.02.03;
Скачать: [xml.tar.bz2];

Вниз

компонент NMHTTP1.   Найти похожие ветки 

← →
апвып   (2007-05-16 08:59) [0]

как определить что он закончил получать данные с сервера?


NMHTTP1.Connect;

NMHTTP1.Write("GET / HTTP/1.1"+#13#10);
NMHTTP1.Write("User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) Opera 7.60  [ru] (IBM EVV/3.0/EAK01AG9/LE)"+#13#10);
NMHTTP1.Write("Host: "+sServer+#13#10);
NMHTTP1.Write("Accept: application/xhtml+voice+xml;version=1.2, application/x-xhtml+voice+xml;version=1.2, text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1"+#13#10);
NMHTTP1.Write("Accept-Language: en"+#13#10);
NMHTTP1.Write("Accept-Charset: windows-1252, iso-8859-1;q=0.6, *;q=0.1"+#13#10);
NMHTTP1.Write("Accept-Encoding: deflate, gzip, x-gzip, identity, *;q=0"+#13#10);
NMHTTP1.Write("Connection: Keep-Alive"+#13#10);
NMHTTP1.Write("Content-Type: application/x-www-form-urlencoded"+#13#10#13#10);

while(?????????)do
 begin
   s:=NMHTTP1.Readln;
   memo1.Text:=memo1.Text+s;
 end;

NMHTTP1.Disconnect;


---

← →
апвып   (2007-05-21 09:25) [1]

?

---

← →
G_M_S ©   (2007-05-21 10:33) [2]

Закладка Indy -> TidHTTP, там все гораздо проще реализовано (если вас интересует просто получение страниц). Кстати, NMHTTP из последних дельфей убрали.

---

Страницы: 1 вся ветка

Форум: "Сети";
Текущий архив: 2008.02.03;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.052 c