This commit is contained in:
cvaldes1201
2025-07-01 11:33:47 -06:00
parent 8e5d084e2d
commit 1a3a6d5ed9
40 changed files with 4753 additions and 1002 deletions

View File

@@ -199,7 +199,7 @@ Sub flp_LocationChanged (Location1 As Location)
End If
If B4XPages.MainPage.cliente.LA_GPS.IsInitialized Then
B4XPages.MainPage.cliente.LA_GPS.Text = "CON UBICACION GPS"
B4XPages.MainPage.cliente.LA_GPS.TextColor = Colors.blue
B4XPages.MainPage.cliente.LA_GPS.TextColor = Colors.Black
End If
' LogColor(Location1.Latitude, Colors.red)
CallSub2(Starter, "GPS_LocationChanged", Location1)