Estoy tratando de acceder a un archivo update.txt en mi sitio web, usando un programa compilado por DelphiXE y el componente IdHTTP.

El código que estoy usando es el siguiente:

procedure TFormAbout.SpeedButtonUpdateClick(Sender: TObject);

function CheckUpdates: String;
var lIdHttp: TIdHTTP;
begin
  lIdHttp := TIdHTTP.Create(nil);
  result := lIdHttp.Get('http://www.test.com/test_down_load/update.txt');
end;

var
sWebVersion: String;
sVersionList: TStringList;

begin
try
  sWebVersion := Checkupdates;
except
  on E: Exception do
  begin 
    ShowMEssage(E.ErrorMessage);
    MessageDlg('An Error occured checking for an update.',mtError,[mbOK],0);
  end;
end;
if sWebVersion <> '' then
  begin
    sVersionList.CommaText := sWebVersion;
    ShowMessage('Version: ' + sVersionList[0] + ' - ' + 'Date: ' + sVersionList[1]);
  end;
end;

Esto sin embargo da como resultado un error: HTTP1.1 / 403 Prohibido

El componente IdHTTP se ha configurado con las siguientes propiedades.

HandleRedirects := true;
HTTPOptions [hoForceEncodeParams];
ProtocolVersion := pv1_1;
Request.UserAgent := Mozilla/5.0 (compatible; Test)

Si ingreso la URL en un navegador IE, devuelve el archivo sin errores, pero al acceder desde mi programa, aparece el error. Cualquier puntero será apreciado. .htaccess es correcto para el sitio. Los permisos para el archivo son correctos en el sitio web: 0644.

¿Tengo que establecer cualquiera de las otras propiedades para el componente IdHTTP? Solo tengo este componente en el formulario acerca de. ¿Necesito algo más?

El archivo updateinfo.txt simplemente contiene el texto entre comillas: "18.3.5,2011 / 12/17"

Simplemente he usado "prueba" aquí en lugar de mi nombre de programa y URL reales.

Regards Adrian