| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
компонент NMHTTP1.
апвып © (2007-05-16 08:59:00)как определить что он закончил получать данные с сервера?
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;
G_M_S (2007-05-21 10:33:00) [1]Закладка Indy -> TidHTTP, там все гораздо проще реализовано (если вас интересует просто получение страниц). Кстати, NMHTTP из последних дельфей убрали.
апвып (2007-05-21 09:25:00) [2]?
| |
