PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 25 → Wx - Exemplo Google Maps
Wx - Exemplo Google Maps
Iniciado por adrianoboller, 31,ago. 2015 23:27 - No hay respuesta
Miembro registrado
3.659 mensajes
Popularité : +175 (223 votes)
Publicado el 31,agosto 2015 - 23:27
//Google Maps
GoogleId is string = "Google Maps"

PontoMapa is gglMapParameter

CoordMapa is gglCoordinate

PontoMapa..Path..Color = LightYellow

PontoMapa..Path..Thickness = 6

PontoMapa..Path..Opacity = 100

// monta o vetor de pontos Google Maps

FOR EACH ROW i OF TblRota

CoordMapa..Latitude = ColLatitude

CoordMapa..Longitude = ColLongitude

ArrayAdd(PontoMapa..Path..Point,CoordMapa)

END

PontoMapa.Format = gglPNG32

// mostra o mapa com a rota na tela

ImgMapa = GglGetStaticMap(GoogleId, 40.6423, -73.7959, 12, 600, 600,gglHybrid,PontoMapa)