This commit is contained in:
Javier
2025-10-07 17:43:36 -06:00
parent 377499c4ac
commit 5d6fb50254
289 changed files with 4130 additions and 3048 deletions

View File

@@ -126,7 +126,7 @@ Private Sub CreateLocationRequest As LocationRequest
If B4XPages.MainPage.logger Then Log("CreateLocationRequest")
Dim lr As LocationRequest
lr.Initialize
lr.SetInterval(10000) 'Intervalo deseado para actualizaciones de ubicacion
lr.SetInterval(100000) 'Intervalo deseado para actualizaciones de ubicacion
lr.SetFastestInterval(lr.GetInterval / 2) 'Intervalo minimo para actualizaciones de ubicacion
lr.SetSmallestDisplacement(75) 'Solo registra cambio de ubicacion si es mayor a XX mts
lr.SetPriority(lr.Priority.PRIORITY_HIGH_ACCURACY)