Hola darkamerico.
Proba de este modo:
Código Delphi
[-]
...
uses IdHTTP;
function GetURLText(const aURL: string): string;
begin
with TIdHTTP.Create(nil) do
try
Result := Get(aURL);
finally
Free;
end;
end;
Llamada ejemplo:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
const
URLCNST = 'http://www.sbs.gob.pe/0/modulos/jer/jer_interna.aspx?are=0&pfl=0&jer=147';
var
Str: string;
begin
Str := GetURLText(URLCNST);
...
end;
Saludos.
