
Si no queremos que pueda activarse el protector de pantalla mientras se está ejecutando nuestra aplicación podemos desactivarlo (y volverlo a activar) mediante el uso del API SystemParametersInfo.
Declaramos :
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
Private Const SPI_SETSCREENSAVEACTIVE = 17
Private Const SPIF_SENDWININICHANGE = &H2
Y para impedir que se active :
SystemParametersInfo SPI_SETSCREENSAVEACTIVE, False, 0&, SPIF_SENDWININICHANGE
Para volver a restaurarlo como estaba antes de nuestra intervención :
SystemParametersInfo SPI_SETSCREENSAVEACTIVE, True, 0&, SPIF_SENDWININICHANGE
Es importante acordarse de restaurarlo a su estado inicial.
En el caso de que no esté activado el salvapantallas en el sistema estas acciones no tienen ningún efecto, es decir, no os preocupeis que no va a quedar activado si antes no lo estaba.

