[tulio]

Hola Amigos

Les cuento que tengo en un programa un procedimiento desarrollado por el amigo Neftali , que ingresando el domicilio ciudad y pais de un lugar te averigua la longitud y latitud, para despues entrar al google maps y marcar la ubicación. Esto anduvo perfecto hasta que hace una semana no anda mas y da el siguiente error : http/1.1 403 FORBIDDEN.
A continuacion les pego el codigo

Código Delphi [-]
Procedure TF_mapa.btn1Click(Sender: TObject);
const
  STR_WEB = 'http://maps.google.com/maps/geo?q=';
  STR_OUT = '&output=csv';    // formato de salida
  STR_KEY = '&key=ABQIAAAAFVb255bTSpn4DC0nkcIz3hTgmueMIh62ahlPS2dC-DIXqzciAxRZItsH3Fy4UcBpz0Q4D8XHzbxt3A';
var
  Stream: TStringStream;
  Str, res:string;
begin
  Stream := TStringStream.Create('');
  try
    Str := STR_WEB + edt1.text + STR_OUT + STR_KEY;
    idhttp2.Get(Str, Stream); //// esta es la linea que llama al componente y da el error (http/1.1 403 FORBIDDEN)
    edt2.Text := Stream.DataString;
  Finally
    FreeAndNil(Stream);
  end;
  editlatitude.text:= copy(edt2.text,7,11);
  editlongitude.text:= copy(edt2.text,19,11);
End;

A mi parecer como que se vencio la KEY que estoy ingresando, lo consulte a Neftali y me dio una direccion para obtener una nueva Key, al solicitarla me dan una clave que es mas corta y sigue el mismo error. (esta es la nueva que me dio google AIzaSyAyhlyxgsf1hBzRu1j-vWcB0yF9v9QNWEc)
Alguien me podria decir que es lo que estoy haciendo mal, o que tenga una KEY habilitada que me pase.

Saludos y gracias

tulio de Argentina