marcioe Posted October 9, 2020 Report Share Posted October 9, 2020 Pessoal estou precisando algo proximo a isso Posicionar Clientes no Mapa. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted October 10, 2020 Report Share Posted October 10, 2020 Quote Link to comment Share on other sites More sharing options...
marcioe Posted October 10, 2020 Author Report Share Posted October 10, 2020 Esse dele mostra apenas o ponto A e o ponto B eu precisava fazer o posicionamento no mapa, Mas vou testar Quote Link to comment Share on other sites More sharing options...
Theotokos Posted October 10, 2020 Report Share Posted October 10, 2020 Function VerRotaVisitadas(aDd) // aDd = Nome, Endereco, Bairro, Cidade, Estado Local cHtml:="", oOle, x1:=0, nD1 := 1 *oOle:= CreateObject("InternetExplorer.Application") *oOle:Visible := .t. // Apresenta o Browser *oOle:ToolBar := .f. // Desativa a barra de ferramentas *oOle:StatusBar := .f. // Desativa a barra de status *oOle:MenuBar := .f. // desativa a barra de menu cHtml+='<head>'+CRLF cHtml+='<title>Mapeamento dos Clientes</title>'+CRLF cHtml+='<style type="text/css">'+CRLF cHtml+='#mapa{width:1200px;'+CRLF cHtml+='height:1000px}'+CRLF cHtml+='</style>'+CRLF cHtml+='<script type="text/javascript" src="http://maps.google.com/maps/api/js?sensor=true"></script>'+CRLF cHtml+='<script type="text/javascript">'+CRLF cHtml+='var map = null;'+CRLF cHtml+='function carregar(){'+CRLF cHtml+='var latlng = new google.maps.LatLng(-3.787522,-38.518066);'+CRLF cHtml+='var myOptions = {'+CRLF cHtml+='zoom: 14,'+CRLF cHtml+='center: latlng,'+CRLF cHtml+='mapTypeId: google.maps.MapTypeId.ROADMAP};'+CRLF cHtml+='map = new google.maps.Map(document.getElementById("mapa"), myOptions);'+CRLF * For nD1 := 1 To Len(aDd) cNome_Google := aDd[nD1,1] cEndereco_Google := aDd[nD1,2] cBairro_Google := aDd[nD1,3] cCidade_Google := aDd[nD1,4] cEstado_Google := aDd[nD1,5] x1++ fBus := "Carro_1.JPG" cHtml += ' '+CRLF cHtml += 'var endereco'+Alltrim(Str(x1))+'="'+Alltrim(cEndereco_Google)+' - '+Alltrim(cBairro_Google)+' - '+Alltrim(cCidade_Google)+' - '+AllTrim(cEstado_Google)+'";'+CRLF cHtml += 'geocoder = new google.maps.Geocoder();'+CRLF cHtml += 'geocoder.geocode({"address":endereco'+Alltrim(str(x1))+'}, function(results, status){ if( status = google.maps.GeocoderStatus.OK){ latlng = results[0].geometry.location;'+CRLF cHtml += 'markerInicio'+Alltrim(Str(x1))+' = new google.maps.Marker({position: latlng,map: map, title:"'+Alltrim(cNome_Google)+'", icon: "'+fBus+'"});'+CRLF cHtml += [var infowindow = new google.maps.InfoWindow({ content: '<strong>]+Alltrim(cNome_google)+[</strong><br>]+Alltrim(cEndereco_Google)+[, ]+Alltrim(cBairro_Google)+[ ]+Alltrim(cCidade_Google)+[ ]+Alltrim(cEstado_Google)+[<BR>]+['});]+CRLF cHtml += 'google.maps.event.addListener(markerInicio'+Alltrim(Str(x1))+', "click", function(event) { infowindow.open(map,markerInicio'+Alltrim(Str(x1))+');});'+CRLF cHtml += 'map.setCenter(latlng); } });'+CRLF cHtml += ' '+CRLF * Next nD1 * cHtml+='}'+CRLF cHtml+='</script>'+CRLF cHtml+='</head>'+CRLF cHtml+='<body onload="carregar()">'+CRLF cHtml+='<div id="mapa"></div>'+CRLF cHtml+='</body>'+CRLF cHtml+='</html>'+CRLF MemoWrit("visitarota.html",chtml) // uRegPath = "c:\test" ShellExecute(GetActiveWindow(),"open",'visitarota.html') *oOle:Navigate2("visitarota.htm") *hWnd:=oOle:hWnd *BringWindowToTop(hWnd) Return nil tenho esse em meus arquivos aqui... não me lembro quem postou no forum... vê se ajuda... Ah! se tiver alguma melhoria ai, compartilha com gente... Vlw!!!! eu ainda não usei, mas vá que uma hora a gente precisa... rsrsrsrsrsrsrs Quote Link to comment Share on other sites More sharing options...
kapiaba Posted October 10, 2020 Report Share Posted October 10, 2020 Quote Link to comment Share on other sites More sharing options...
marcioe Posted October 13, 2020 Author Report Share Posted October 13, 2020 Infelizmente, eu não consegui fazer funcionar. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted October 13, 2020 Report Share Posted October 13, 2020 Opa, agora é programação, é nóis... Tens um exemplo do que já fizestes para partirmos dele? Explique miudinho, pois se eu não entender, posto no forum internacional, pois, modéstia a parte, sou Moderador Global no Inter. Ou podeis postar aqui: http://forums.fivetechsupport.com/ Que eu "reforço" lá... Abs. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted October 13, 2020 Report Share Posted October 13, 2020 Sua ideia, é algo assim? https://support.google.com/maps/forum/AAAAzhXbq5EHdQvLC4WcrA/?hl=pt&gpf=%23!topic%2Fmaps-pt%2FHdQvLC4WcrA%3Bcontext-place%3Dtopicsearchin%2Fmaps-pt%2Fauthorid%243AAPn2wQcIcg6wUujAB9LQwkD4yn-5SutBFP8Cq4wONZt92RE3Srjy4AHr32ZUOXElAJOD-Ve4mk0X%7Csort%3Adate%7Cspell%3Afalse Quote Link to comment Share on other sites More sharing options...
marcioe Posted October 13, 2020 Author Report Share Posted October 13, 2020 Obrigado por responder Exatamente isso que quero, criar um array com os dados (nome, endereço, cep, cidade, estado, etc...) E enviar para o Google posicionar no mapa Tipo isso ai abaixo https://pt.batchgeo.com/ Quote Link to comment Share on other sites More sharing options...
kapiaba Posted October 13, 2020 Report Share Posted October 13, 2020 Acompanhe aqui, e vá contestando o post. Abs. http://forums.fivetechsupport.com/viewtopic.php?f=6&t=39473 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted October 17, 2020 Report Share Posted October 17, 2020 Veja se essa classe do Silvio Falconi, serve: http://forums.fivetechsupport.com/viewtopic.php?f=3&t=39464&p=235639&hilit=mapcontrol#p235639 Arriba LGBTyswxyz... kkkkkkkkkkkkkkkkkk Quote Link to comment Share on other sites More sharing options...
rochinha Posted October 24, 2020 Report Share Posted October 24, 2020 Amiguinhos, Estava reduzindo os links armazenados em meus favoritos e tipificando-os quando encontrei: https://www.script-tutorials.com/google-places-api-practice/ O que você precisa é o que o Google Places lhe permitirá apresentar. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.