Page 1 of 1

OT: Mapas de Google con FWH

PostPosted: Thu Nov 09, 2006 9:57 pm
by jlcapel
Hola,

En www.capelblog.com/?p=83 podemos ver como colocar mapas de google en nuestras aplicaciones fwh.

Saludos,
José Luis Capel

PostPosted: Fri Nov 10, 2006 11:31 am
by Nop
hi, in my appl i receive the error:
Error: Unresolved external '_HB_FUN_TACTIVEX' referenced from D:\_PRJ\SCAS\SCAS_M.OBJ

PostPosted: Fri Nov 10, 2006 2:30 pm
by jlcapel
Hi Nop,

Maybe you don't have an early version of FWH. What version do you have?

Regards,
José Luis Capel

PostPosted: Fri Nov 10, 2006 3:37 pm
by Biel EA6DD
Hola José Luis, muy interesante.
Funciona perfecto, revisare el API de google, el tema de mapas , distancias,rumbos,..., me interesa mucho. Un saludo, y gracias por la aportación.


PD. En el codigo que pones de ejemplo estan invertidos estatua de libertad <-> Torres Eifel

PostPosted: Fri Nov 10, 2006 5:35 pm
by wilsongamboa
Exelente Trabajo
y gracias x compartirlo

Una pregunta y perdon la ignorancia, generalmente se dan las coordenas
algo asi

Latitud = 0 grados 4 Minutos 40.8 Segundos S (Sur)
Longitud = 78°27'47.69"W

Como paso estos valores a decimal que es lo que tienes en tu ejemplo
Saludos
y Gracias x Todo (Funciona ok)

PostPosted: Fri Nov 10, 2006 10:25 pm
by jlcapel
Wilson,

Latitud = 0 grados 4 Minutos 40.8 Segundos S (Sur)
Longitud = 78°27'47.69"W

Como paso estos valores a decimal que es lo que tienes en tu ejemplo


Mírate el API de google. Si aún así no lo consigues, avísame que te digo como ;-)

Saludos,
José Luis Capel
www.capelblog.com

PostPosted: Fri Nov 10, 2006 11:15 pm
by wilsongamboa
gracias Jose Luis

ya he revisado pero no doy....

Saludos

PostPosted: Sat Nov 11, 2006 4:12 pm
by jlcapel
Wilson:

Una manera de hacerlo (hay varias) es colocar un 'listener' para que en cada movimento de la ventana del navegador de indique la posición geodésica en centesimal. Sigue este enlace [url]http://www.google.com/apis/maps/documentation/#Geocoding_Examples
[/url]. No obstante, estoy preparando otro ejemplo con más 'cosas', tales como puntos de interés, etiquetas, trazas de rutas, etc...

Saludos,
José Luis Capel
www.capelblog.com

PostPosted: Sat Nov 11, 2006 8:34 pm
by Andrés González
JL excelente trabajo, deje el viernes una consulta al respecto puesto que lo localice antes de que pusieras el mensaje en este foro en tu pagina y por supuesto me alegre infinitamente puesto que de cara a mi trabajo esto aporta unas ventajas exceletes. Estoy estudiando el api para implementar cosas que se me van ocurriendo entre ellas la de capturar la imagen por ello la consulta que hice, se te ocurre alguna forma de hacerlo?. Tambien el tema de las coordenadas es algo que tengo en mente, aunque como sabemos las coordenadas de las urbanizaciones del termino, no me planteaba mucho trabajo, pero si la forma de localizar el punto exacto en los casos de siturar un accidente de trafico, una averia viaria o cualquier tema relacionado con posiciones de nuestro término. No se si hay alguna forma de situar una cruz en el centro o un sistema de coordeadas para localizar la latitud y la longitud, segun comentas parece que sí.
Desde aqui mi sincero reconocimiento a este trabajo que aunque comentas que es heradado del foxpro, siempre es de agradecer tener estas herramientas para añadir a nuestros diseños.

Gracias.

PostPosted: Mon Nov 13, 2006 10:21 am
by Biel EA6DD
Para convertir de formato grados a decimal
Code: Select all  Expand view
FUNCTION Gra2Dec(nGra,nMin,nSec) //- Sur y oeste signo negativo.
RETURN nGra+(nMin/60)+(nSec/3600)


Puede implementarse con otro parametro y pasarle (N)orte, (S)ur, ...

PostPosted: Mon Nov 13, 2006 11:37 am
by wilsongamboa
Gracias Biel

Saludos

PostPosted: Mon Nov 13, 2006 6:06 pm
by Biel EA6DD
Code: Select all  Expand view
FUNCTION GraMinSec2Dec(nGra,nMin,nSec) //- Sur y oeste signo negativo.
RETURN (Abs(nGra)+(nMin/60)+(nSec/3600))*IF(nGra<1,-1,1)

FUNCTION Dec2Gra(nVal);RETURN Int(nVal)
FUNCTION Dec2Min(nVal);RETURN Abs(Int(nVal%Dec2Gra(nVal)*60))
FUNCTION Dec2Sec(nVal);RETURN Abs(((nVal%Dec2Gra(nVal)*60)%Dec2Min(nVal))*60)

PostPosted: Tue Nov 14, 2006 9:02 am
by Andrés González
Biel revisa tu correo.

PostPosted: Tue Nov 14, 2006 9:15 am
by toya
Ótimo!!!
Saberias me dizer quais são os limites do ZOOM ?

Me localizo em:
nLat := 20.211945
nLon := -50.9269528