49306956


Создать ответ 
 
Рейтинг темы:
  • Голосов: 0 - Средняя оценка: 0
  • 1
  • 2
  • 3
  • 4
  • 5
Как загрузить данные с инета без TWebBrowser ?
Автор Сообщение
jkeks Не на форуме
Постоялец
***

Сообщений: 148
Зарегистрирован: 02.2010
Сообщение: #1
Как загрузить данные с инета без TWebBrowser ?
сабж с примером можно ?
Не для проектов а так вообщем.
10.02.2010 7:07
Вебсайт Найти все сообщения Цитировать это сообщение
all__ Не на форуме
Админ
*******

Сообщений: 627
Зарегистрирован: 01.2010
Сообщение: #2
RE: Как загрузить данные с инета без TWebBrowser ?
Набросал консольный пример.
Код:
program idget;

{$APPTYPE CONSOLE}

uses
  SysUtils,IdHTTP,IdAntiFreeze;

var
  idAF:TIdAntiFreeze;
  http:TIdHTTP;
begin
  { TODO -oUser -cConsole Main : Insert code here }
  idAF:=TIdAntiFreeze.Create(nil);
  http:=TIdHTTP.Create(nil);
  writeln(http.Get('http://ugoo.ru'));
end.

TIdAntiFreeze используется, чтобы окно не зависало на время выполнения запроса, если источник долго отвечает.

TIdHTTP выполняет Get запрос.

В прикреплении рабочий пример выполняющий Get запрос и выводящий его в консоль.


Прикрепления
.zip  get.zip (Размер: 1.75 Кб / Загрузок: 22)
10.02.2010 15:33
Вебсайт Найти все сообщения Цитировать это сообщение
Создать ответ