20/12/23 - Se cambio rootExternal a Internal

This commit is contained in:
2023-12-20 21:25:24 -06:00
parent f57db99170
commit bc66ad5dbd
8 changed files with 81 additions and 83 deletions

View File

@@ -181,7 +181,7 @@ Sub B4XPage_Appear
' LogColor("Start Tracker1", Colors.red)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then
StartService(Tracker)
If Not(Tracker.Tracking) Then StartService(Tracker)
' LogColor("Start Tracker", Colors.red)
Else
ToastMessageShow("No permission", True)
@@ -196,11 +196,11 @@ Sub B4XPage_Appear
usuario = c.GetString("USUARIO")
End If
c.Close
Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then
Log("Con permisos de escritura externa")
End If
' Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
' Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
' If Result Then
' Log("Con permisos de escritura externa")
' End If
End Sub
'You can see the list of page related events in the B4XPagesManager object. The event name is B4XPage.