Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Colaboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 15-12-2009
Avatar de edgwin
edgwin edgwin is offline
Miembro
 
Registrado: abr 2006
Ubicación: Guadalajara Jal. Mex
Posts: 163
Poder: 21
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
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Intraweb estebanx Internet 11 14-05-2008 16:40:59
IntraWeb leirbag Internet 2 16-01-2007 17:24:52
IntraWeb dayrontbs Internet 3 06-07-2006 23:18:50
Intraweb LILYBEL Internet 0 23-10-2004 21:17:51
IW Intraweb BDE y ADO Descendents Internet 2 24-09-2004 23:58:10


La franja horaria es GMT +2. Ahora son las 20:17:21.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi