Probleme de screensaver

FrostByte Messages postés 138 Date d'inscription mercredi 4 avril 2001 Statut Membre Dernière intervention 28 janvier 2006 - 30 juil. 2002 à 17:21
cs_sauveur Messages postés 36 Date d'inscription vendredi 12 juillet 2002 Statut Membre Dernière intervention 21 décembre 2004 - 5 août 2002 à 21:18
Comment faire pour desactiver l'écrande veille !! (que se soit par api ou autre !!)

1 réponse

cs_sauveur Messages postés 36 Date d'inscription vendredi 12 juillet 2002 Statut Membre Dernière intervention 21 décembre 2004
5 août 2002 à 21:18
Avec cette API

Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Long, ByVal fuWinIni As Long) As Long

Private Const SPI_SETSCREENSAVEActivation = 17

Tu ajoute cette fonction aussi

Public Function AlternerEcranDeVeille(Activation As Boolean) As Boolean
Dim SignetDActivation As Long
Dim RetourDeLaValeur As Long
SignetDActivation = IIf(Activation, 1, 0)
RetourDeLaValeur = SystemParametersInfo(SPI_SETSCREENSAVEActivation, SignetDActivation, 0, 0)
AlternerEcranDeVeille = RetourDeLaValeur > 0
End Function

Lorsque tu appelles cette fonction tu met True si tu veux mettre l'écran et False si tu veux pas...
0