Ver Mensaje Individual
  #4  
Antiguo 15-12-2009
Avatar de edgwin
edgwin edgwin is offline
Miembro
 
Registrado: abr 2006
Ubicación: Guadalajara Jal. Mex
Posts: 163
Reputación: 19
edgwin Va por buen camino
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!
Responder Con Cita