Automatizando Aplicaciones desde VFP (Google Earth)

Pues Google Earth tiene también su modelo de objectos. Lo primero es tener instalado esta aplicación, existe una versión gratis aquí:

El siguiente ejemplo los lleva directamente a la ciudad de Santiago de los Caballeros (donde vivo) en República Dominicana.

Recordandoles que la magia aquí consiste en tres cosas:
1- Conocer como se llama la clase, talvez la parte mas dificil pues hay que investigarla en Internet o usando el Object Browser de VFP, herramienta esta que yo nunca termino de entender bien.

2- Sacarle provecho al Intellisence, disponible desde la version 7 en adelante, que aunque la heredamos de los chicos de VB, se hizo mejor que la de VB.

3- Tener un poco de arte, para inventar multiples usos y resolver necesidades



TEXT TO lcAddress NOSHOW
Santiago dominican republic
ENDTEXT

oGE = CREATEOBJECT("GoogleEarth.ApplicationGE")
DO WHILE oGE.IsInitialized = 0 OR oGE.IsOnline = 0
DOEVENTS
ENDDO

oSC = oGE.SearchController
*oSC.ClearResults
INKEY(5)
oSC.Search(lcAddress)