Foros Club Delphi - Intentado integrar google maps en delphi 5

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)

- - Intentado integrar google maps en delphi 5 (https://www.clubdelphi.com/foros/showthread.php?t=66996)

radge

23-03-2010 18:02:25

Intentado integrar google maps en delphi 5

Buenas , soy usuario de delphi5 e intento mostrar un mapa obtenido de google maps mediante el componente webbrowser.

En el click del botón tengo lo siguiente extraido de algun tutorial.

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
var
  Doc2: IHTMLDocument2;
begin
WebBrowser2.Navigate('http://www.stevetrefethen.com/files/googlemap.htm');

  with WebBrowser2.Document as IHTMLDocument2 do
    with parentWindow do
      execScript('createMapMarker("31.05173494", "-122.03160858", "test")', 'JavaScript');
end;

Me compila... pero me salta una excepción cuanda pasa por la linia with parentWindow do

Se os ocurre por donde pueden ir los tiros ?

salu2 radge

maeyanes

23-03-2010 18:23:35

Hola...

¿Y podríamos saber cual es la excepción que te "salta"?

Saludos...

radge

23-03-2010 18:55:45

Me salta...

Access violation at address 0047C5E9 in module 'xxxx.exe'. Read of address 00000000

salu2 radge

maeyanes

23-03-2010 19:03:37

Hola...

El error es por que estás tratando de usar un método de un objeto que referencia a nil...

Código Delphi [-]with WebBrowser2.Document as IHTMLDocument2 do
  if Assigned(parentWindow) then  // <--- verifico si está asignado parentWindow...
    with parentWindow do
      execScript('createMapMarker("31.05173494", "-122.03160858", "test")', 'JavaScript');

Saludos...

radge

24-03-2010 09:02:01

Cita:

Empezado por maeyanes (Mensaje 357977)

Hola...

El error es por que estás tratando de usar un método de un objeto que referencia a nil...

Código Delphi [-]with WebBrowser2.Document as IHTMLDocument2 do if Assigned(parentWindow) then // <--- verifico si está asignado parentWindow... with parentWindow do execScript('createMapMarker("31.05173494", "-122.03160858", "test")', 'JavaScript');

Saludos...

He probado y me sale exactamente lo mismo

Access violation at address 0047C5E9 in module 'xxxx.exe'. Read of address 00000000

gracias , radge

La franja horaria es GMT +2. Ahora son las 06:59:43.