Spanish [SOLICIONADO]detectar pantalla apagada y/o modo avion

M

mvera

Active Member
Licensed User
Longtime User
hola.

Necesito detectar cuando el dispositivo se encuentra con la pantalla apagada y/o cuando el dispositivo se encuentra en modo avión.

como dato tengo un servicio que cada x momentos chequea informacion y necesito saber estos estados para actuar o no con otra accion.


espera me puedan orientar.


gracias.
 

bgsoft

Well-Known Member
Licensed User
Longtime User
Hola

Esto deberian ser dos preguntas, pero lo ignoraré

Ver si está la pantalla apagada:
B4X: 
Sub ComprobarPantallaApagada As Boolean


Dim ok As Boolean
Dim r As Reflector
r.Target = r.GetContext

r.Target = r.RunMethod2("getSystemService", "keyguard", "java.lang.String")

ok=  r.RunMethod("inKeyguardRestrictedInputMode") ' devuelve true si la pantalla está apagada

LogColor("ComprobarPantallaApagada " & ok,Colors.Blue)


Return ok

End Sub


Modo avión:
B4X: 
Dim ModoAvion As Toggle ' libreria Toggle

log("ModoAvion " & ModoAvion.AirplaneMode)

Tambien puedes saber si esta conectado el wifi y los datos moviles

B4X: 
log("Datos moviles " & ModoAvion.DataConnection)
log("Wifi " & ModoAvion.WiFi)

Y por el mismo precio y si quieres ver la pantalla si esta apagada y emplear la misma libreria (Toggle)

B4X: 
log("Pantalla encendida? " & ModoAvion.isScreenOn) ' devuelve true si esta encendida




Saludos
 
Last edited:
You must log in or register to reply here.

Similar Threads

Spanish Great tool, scrcpy (v2.5)
Replies
0
Views
984
Situ LLC
J
Spanish Android Wear
Replies
2
Views
1K
Jannete
J
S
Spanish Lector de barras en actividad con sólo botones
Replies
2
Views
1K
josejad
M
Spanish detectar uso del movil
Replies
1
Views
2K
bgsoft
Menu
Log in
Register
Cookies are required to use this site. You must accept them to continue using the site. Learn more…