[Romix]

Уважаемые прогеры!!! Спасайте... Нужен пример консольного Indy приложения, главное что бы без формы!!! Просто консоль!!! Заранее благодарен!!!

[NumLock]

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

program Project1;   {$APPTYPE CONSOLE}   uses   IdHTTP,   SysUtils;   var   http: TIdHTTP;   s: String;   begin   http:=TIdHTTP.Create(nil);   try     s:=http.Get('http://ya.ru');     Writeln(http.ResponseText);     Writeln(s);   except     on E: Exception do Writeln(E.message);   end;   http.Free;   Readln; end.