Gracias por responder.
Lo que necesito hacer es que me aparezca el mapa, se me ocurre poner dos botones en la parte inferior, uno que diga "obtener coordenadas" y que estas las coloque en un par de IWEdit's y otro boton que diga "Guardar coordenadas". Aun lo estoy estudiando, pero estoy atorado en la parte de mostrar el mapa (ya lo logre utilizando "WebApplication.Response.ContentStream := f" (donde "f" es un TFileStream que contiene el archivo "mapa.html") Pero estoy intentando colocar el mapa en tiempo de ejecucion pero me marcan errores ...
Código Delphi
[-]
procedure TIWForm2.IWAppFormRender(Sender: TObject);
begin
JavaScriptOnce := 'var map = null;'+chr(13)+'var geocoder = null;'+chr(13)+''+chr(13)+'<_script language=JavaScript src="'+chr(13)+'<_script" target="_blank">http://maps.google.com/maps?file=api&v=2.x&key=abcd_local">'+chr(13)+'<_script type="text/javascript">';
PageContext.AddToInitProc('map = new GMap2(document.getElementById("map"));');
PageContext.AddToInitProc('map.addControl(new GOverviewMapControl());');
PageContext.AddToInitProc('map.addControl(new GHierarchicalMapTypeControl());');
PageContext.AddToInitProc('map.addControl(new GMapTypeControl());');
PageContext.AddToInitProc('map.addControl(new GScaleControl());');
PageContext.AddToInitProc('map.addControl(new GSmallZoomControl());');
PageContext.AddToInitProc('map.addControl(new GSmallMapControl());');
PageContext.AddToInitProc('map.addControl(new GLargeMapControl());');
PageContext.AddToInitProc('map.setMapType(G_HYBRID_MAP);');
PageContext.AddToInitProc('map.setCenter(new GLatLng(20.678989402134355,-103.37575525045395),15); // GDL');
PageContext.AddToInitProc('var html="'http://neftali.clubdelphi.com/images/imagen_neftali_60x54.jpg'' width=''60'' height=''54''/>
by Neftalí -Germán Estévez- 2009
'http://neftali.clubdelphi.com'' target=''_blank''>http://neftali.clubdelphi.com
";');
PageContext.AddToInitProc('var point = new GLatLng(20.678989402134355,-103.37575525045395);');
PageContext.AddToInitProc('var marker = new GMarker(point);');
PageContext.AddToInitProc('map.addOverlay(marker);');
PageContext.AddToInitProc('geocoder = new GClientGeocoder();');
end;
Al correrlo me marca un error en javascript
:
Mensaje: Object required
Línea: 252
Carácter: 26
Código: 0
URI:
http://maps.gstatic.com/intl/es_ALL/...s2.api/main.js
¿Sabes a que se deba el error? yo por mi parte sigo investigando ...
saludos!