Così?:
'***Nel manifest
' AddPermission(android.permission.WRITE_EXTERNAL_STORAGE)
' AddPermission(android.permission.READ_EXTERNAL_STORAGE)
' AddPermission(android.permission.ACCESS_NETWORK_STATE)
' AddPermission(android.permission.ACCESS_FINE_LOCATION)
' AddPermission(android.permission.BLUETOOTH_ADVERTISE)
' AddPermission(android.permission.BLUETOOTH_CONNECT)
' AddPermission(android.permission.BLUETOOTH_SCAN)
Functions.RP.CheckAndRequest(Functions.RP.PERMISSION_WRITE_EXTERNAL_STORAGE)
Wait For B4XPage_PermissionResult (Permission As String, WRITE_FILE As Boolean)
If WRITE_FILE = True Then
End If
Functions.RP.CheckAndRequest(Functions.RP.PERMISSION_READ_EXTERNAL_STORAGE)
Wait For B4XPage_PermissionResult (Permission As String, READ_FILE As Boolean)
If READ_FILE = True Then
End If
Functions.RP.CheckAndRequest("android.permission.ACCESS_NETWORK_STATE")
Wait For B4XPage_PermissionResult (Permission As String, ACCESS_NETWORK_STATE As Boolean)
If ACCESS_NETWORK_STATE = True Then
End If
Functions.RP.CheckAndRequest("android.permission.ACCESS_NETWORK_STATE")
Wait For B4XPage_PermissionResult (Permission As String, ACCESS_NETWORK_STATE As Boolean)
If ACCESS_NETWORK_STATE = True Then
End If
Functions.RP.CheckAndRequest(Functions.RP.PERMISSION_ACCESS_FINE_LOCATION)
Wait For B4XPage_PermissionResult (Permission As String, FINE_LOCATION As Boolean)
If FINE_LOCATION = True Then
End If
Functions.RP.CheckAndRequest("android.permission.BLUETOOTH_ADVERTISE")
Wait For B4XPage_PermissionResult (Permission As String, BLUETOOTH_ADVERTISE As Boolean)
If BLUETOOTH_ADVERTISE = True Then
End If
Functions.RP.CheckAndRequest("android.permission.BLUETOOTH_CONNECT")
Wait For B4XPage_PermissionResult (Permission As String, BLUETOOTH_CONNECT As Boolean)
If BLUETOOTH_CONNECT = True Then
End If
Functions.RP.CheckAndRequest("android.permission.BLUETOOTH_SCAN")
Wait For B4XPage_PermissionResult (Permission As String, BLUETOOTH_SCAN As Boolean)
If BLUETOOTH_SCAN = True Then
End If