Italian [B4A e B4I] Schermo sempre acceso

[Aldo's]

Come faccio a fare in modo che, se l'app è in una pagina specifica, lo schermo non si spenga?
Grazie

 

[sirjo66]

Per B4A:

Dim pws As PhoneWakeState

pws.KeepAlive(False) ' per mantenerlo sempre acceso

pws.ReleaseKeepAlive ' per ritornare alle impostazioni normali

Per B4I però non saprei

 

[Aldo's]

Dim pws As PhoneWakeState

pws.KeepAlive(False) ' per mantenerlo sempre acceso

pws.ReleaseKeepAlive ' per ritornare alle impostazioni normali

Bisogna usare i permessi runtime?

 

[sirjo66]

Non mi sembra

 

[Filippo]

Come faccio a fare in modo che, se l'app è in una pagina specifica, lo schermo non si spenga?
Grazie

B4i PhoneWakeState .KeepAlive(True)

how to set B4i I can do in B4A Dim pws As PhoneWakeState pws.KeepAlive(True) pws.ReleaseKeepAlive

www.b4x.com

 

[Aldo's]

Devo avere fatto qualche pasticcio.
Ho bisogno di una pagina che sia sempre accesa quando è attiva.
Nella pagina ho scritto:

Sub Class_Globals
    Private Root As B4XView 'ignore
    Private xui As XUI 'ignore

    Private pws As PhoneWakeState
End Sub

Poi ho fatto:

Private Sub B4XPage_Appear
    pws.KeepAlive(False)
End Sub

Private Sub B4XPage_Disappear
    pws.ReleaseKeepAlive
End Sub

Ma il risultato è nullo, cioè dopo 25 secondi si scurisce e dopo 30 si spegne.
Sapete aiutarmi su cosa ho sbagliato?

 

[Aldo's]

Per mantenerlo acceso bisogna fare:

    pws.KeepAlive(True)

Ora funziona