FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Pasar Variables a Delphi
Hola a todos:
He tenido que reprogramar una aplicación para localización de direcciones que funcionaba perfectamente y usaba GoogleMaps api V2 a la api V3. Mi problema ahora es que defino en mi programa como parte de una funcion JavaScript lo siguiente: ' var lat = new google.maps.LatLng(results[0].geometry.location.lat());'+ ' var lng = new google.maps.LatLng(results[0].geometry.location.lng());'+ Pero luego no soy capaz de pasar las variables LAT y LNG (que despues del acceso a GoogleMaps ya tienen los valores) a unos edit en mi programa Delphi para poder por ejemplo grabarlas en un fichero. la llamada es donde CodeAddress es la funcion java que llama a google y Address es la dirección a buscar. Trabajo con D5 ¿Podríais ayudarme? Muchas gracias a todos |
#2
|
||||
|
||||
Aquí tienes un ejemplo de uso básico de la API v3 de Google Maps, desde Delphi.
Ahí puedes ver cómo trabajar con Lat y Long en un mapa.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
|||
|
|||
Gracias Neftali. Ese es justo el ejemplo en el que me he basado. En él se define la posición como 'position: results[0].geometry.location' y yo lo he cambiado por
' var latlng = new google.maps.LatLng(results[0].geometry.location.lat(), results[0].geometry.location.lng());'+ ' var lat = new google.maps.LatLng(results[0].geometry.location.lat());'+ ' var lng = new google.maps.LatLng(results[0].geometry.location.lng());'+ y el marker lo pinto en "Position: latlng". Así cargo las variables latlng, lat y lng en el script. Pero lo que necesito es cómo le paso el valor que tenga lat y lng a dos variables o dos labeles o dos edit en delphi para poder grabarlos en un fichero junto con el nombre y dirección del cliente. Gracias |
#4
|
||||
|
||||
A ver si te sirve este.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#5
|
|||
|
|||
Estoy en ello. Tengo que modificar cosas (propiedades de objetos que no tiene D5, XPman, etc) pero estoy probando cosas. Mañana contesto.
Muchas gracias |
#6
|
|||
|
|||
Hola otra vez
He estado probando todo el dia con el ejemplo propuesto y si, obtengo las coordenadas; pero... sólamente cuando se dispara un evento, en este caso el "clik" en el mapa. Mi programa delphi lo que hace es recorrer un fichero y cada vez que lee un registro hace una llamada a script que pinta la marca. Eso lo hace bien pero no obtengo las coordenadas para almacenarlas. Lo que que yo lo que necesito que cada vez que se pinte una marca, se dispare un listener o algo que me haga poder almacenar las coordenadas de la marca que acaba de pintar y poder llevarlas al TListView o al fichero o a donde sea. Esto es lo que no he podido hacer. Seguiré intentando, pero si alguien sabe cómo hacerlo, se lo agradecería un montón. Gracias |
#7
|
||||
|
||||
Hola,
A ver si el artículo "How to call JavaScript functions in a TWebBrowser from Delphi", en Delphi Dabbler, puede serte útil. Concretamente, pienso que igual puedes adaptar lo que se describe en el apartado "Getting the Return Value". |
#8
|
|||
|
|||
Bueno, parece que ya he solucionado el tema de las coordenadas cada vez que se pinta una marca.
Por cada uno de los clientes en un bucle hago: Primero centro el mapa con un "map.SetCenter" Luego pinto la Marca en la posicion que sea con var marker = new google.maps.Marker y luego disparo un evento con google.maps.event.addListener(map, "center_changed", ' definiendo en "latValue" y "lngValue" la posición con document.getElementById("latValue").value = results[0].geometry.location.lat();'+ document.getElementById("lngValue").value = results[0].geometry.location.lng);'+ Y por último recupero las variables con la función function GetIdValue(const Id : string):string; del último ejemplo que propuso Neftalí. Es cuestión de ir puliendo pero puede ser algo para empezar. Gracias. |
#9
|
||||
|
||||
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Pasar variables entre programas | Belaix | Varios | 5 | 24-11-2008 07:06:31 |
Pasar Variables de Forma a Forma con delphi.net ASP | ASAPLTDA | .NET | 5 | 05-07-2007 20:51:31 |
Como Pasar Variables de Forma a Forma con delphi.net ASP | ASAPLTDA | Internet | 2 | 02-07-2007 16:26:41 |
Para pasar variables de Delphi a FastReport | David | Impresión | 3 | 11-05-2007 20:14:22 |
Error al pasar variables | Luis Abraham | PHP | 11 | 10-09-2004 04:37:15 |
|