Leaderboard

local oWnd, oActiveX local cEvents := "" local oMapa, mde_uf, mpara_uf, mde_cid, mpara_cid, mde_rua, mpara_rua mpara_uf := "SP" // uf mpara_cid := "SAO PAULO"//cidade mpara_rua := "RUA ROCHA"//rua mpara_uf := alltrim( mpara_uf ) mpara_cid := alltrim( mpara_cid ) mpara_rua := alltrim( mpara_rua ) msearch := mpara_rua + " " + mpara_cid + " " + mpara_uf DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" oActiveX = TActiveX():New( oWnd, "Shell.Explorer" ) oWnd:oClient = oActiveX // To fill the entire window surface oActiveX:Navigate( "https://www.google.com.br/maps/place/" + msearch ) ACTIVATE WINDOW oWnd MAXIMIZED return nil