Bom gente, ao clicar no botão dirá o Mapa onde você está, a sua localidade X e Y.

Vamos lá, Cliente~Side, FrmMirage

Crie um botão com o caption que quiser, no meu eu puis "Local".

Dois cliques nesse botão fazendo aparecer o código, adicione isso nele:

Código:

Dim Packet As String

    Packet = "REQUESTLOCATION" & END_CHAR
    Call SendData(Packet)

Pronto! Créditos: RenanR~