|
Como !!?
El componente que utilizo para tomar las coordenasas es LocationSensor1.
En su evento ejecuta
Procedure TLocalizacionForm.LocationSensor1LocationChanged(Sender: TObject; Const OldLocation, NewLocation: TLocationCoord2D);
Begin
ENUSLat := NewLocation.Latitude.ToString(ffGeneral, 5, 2, TFormatSettings.Create('en-US'));
ENUSLong := NewLocation.Longitude.ToString(ffGeneral, 5, 2, TFormatSettings.Create('en-US'));
edLatitud.Text := ENUSLat;
edLongitud.Text := ENUSLong;
End;
|