Spanish Evitar que se apaga la pantalla

[Pedrol]

Hola, necesito ayuda por favor, tengo una aplicacion terminada (casi), mi problema es cuando se apaga la pantalla, ya sea por tiempo inactivo o por presionar el boton de apagado, he probado con el statemanager, pero quisiera una solucion que evite desactivar la pantalla y no doy con la solucion, si alguno tuviera una idea se lo agradeceria.
Saludos
pedrol

 

[bgsoft]

Hola Pedrol:

Con esto evitas que se apague:

' activar
 Dim p As PhoneWakeState
 p.KeepAlive(True)

' ----------------------------------
' -----------------------------------

 ' desactivar
 Dim p As PhoneWakeState
 p.ReleaseKeepAlive

Con esto evitas que la CPU se valla a dormir aunque se pulse el botón de encendido:

' activar
Dim p As PhoneWakeState
p.PartialLock

' ---------------------------------
'----------------------------------

 ' desactivar
 Dim p As PhoneWakeState
 p.ReleasePartialLock

Acuerdate de desactivar cuando salgas de la aplicación o tendras todo activo

Saludos