ActiveDelphi

[alima210]

Olá, estou a desenvolver no Delphi XE7 um aplicativo pra android que rastreie os clientes que estão utilizando um app_cliente.

Ex: Tenho um app com um mapa e irei escolher quais clientes estão com o app_cliente aberto, depois irei apertar um botão para pegar as coordenadas do app_cliente e exibir no meu mapa, com isso, irei saber onde ele está.

Alguém pode dá uma ajuda ai, por onde posso começar ???

É tipo um GPS !!!

[chip_set]

Não entendi muito bem o que vc quis dizer mas o delphi tem uns exemplo muito bons dentro dos arquivos publicos que ele cria ao instalar, porém eu acho que o seu app, deve ficar informando a localização e vc ter uma base de dados que receberia essa informação.
O componente Locationsensor é que vai fazer esse processo, vejo as linhas de exemplo a baixo.


LocationSensor1.Active := Switch1.IsChecked;

LDecSeparator := FormatSettings.DecimalSeparator;
LSettings := FormatSettings;
try
FormatSettings.DecimalSeparator := '.';
// Show current location
ListBoxItemLatitude.ItemData.Detail := Format('%2.6f', [NewLocation.Latitude]);
ListBoxItemLongitude.ItemData.Detail := Format('%2.6f', [NewLocation.Longitude]);

// Show Map using Google Maps
URLString := Format('https://maps.google.com/maps?q=%2.6f,%2.6f', [ NewLocation.Latitude, NewLocation.Longitude]);
finally
FormatSettings.DecimalSeparator := LDecSeparator;
end;
WebBrowser1.Navigate(URLString);

// Setup an instance of TGeocoder
try
if not Assigned(FGeocoder) then
begin
if Assigned(TGeocoder.Current) then
FGeocoder := TGeocoder.Current.Create;
if Assigned(FGeocoder) then
FGeocoder.OnGeocodeReverse := OnGeocodeReverseEvent;
end;
except
ListBoxGroupHeader1.Text := 'Geocoder service error.';
end;

// Translate location to address
if Assigned(FGeocoder) and not FGeocoder.Geocoding then
FGeocoder.GeocodeReverse(NewLocation);