Discussion :

[Coussati]

bonsoir, je cherche si c'est possible de faire un programme qui permet d'éteindre son écran avec une touche et de le rallumer avec une autre

je suppose que c'est possible, vu que dans la gestion de l'alimentation il y a "instinction des moniteurs".

[Pedro]

Salut
Ce n'est pas une extinction de l'écran mais une mise en veille
Sinon, en lisant le code VB, on voit ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SendMessage Me.hWnd, WM_SYSCOMMAND, SC_ECRANPOWER, ECRAN_OFF

Que l'on pourrait traduire par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6

Const SC_ECRANPOWER = $HF170;
Const ECRAN_ON = 0;
Const ECRAN_OFF = 1;
...
SendMessage(Handle, WM_SYSCOMMAND, SC_ECRANPOWER, ECRAN_OFF);

[Thierry Laborde]

Petit rajout :

Donc pour info SC_ECRANPOWER n'a pas besoin d'être déclaré car cette constante existe déjà dans l'unité Windows. elle est déclaré sous SC_MONITORPOWER.
Donc au final pour éteindre le moniteur (Le mettre en veille en fait) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Const
  ECRAN_OFF = 1;
...
SendMessage(Handle, WM_SYSCOMMAND, SC_MONITORPOWER, ECRAN_OFF);

et pour le rallumer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Const
  ECRAN_ON = 0;
...
SendMessage(Handle, WM_SYSCOMMAND, SC_MONITORPOWER,ECRAN_ON);

J'ai testé cela fonctionne bien.
Mon cher pedro cela peut faire l'objet d'une entrée dans la FAQ, non ?

[Pedro]

Donc pour info SC_ECRANPOWER n'a pas besoin d'être déclaré car cette constante existe déjà dans l'unité Windows. elle est déclaré sous SC_MONITORPOWER.

Je m'en doutais un peu

Mon cher pedro cela peut faire l'objet d'une entrée dans la FAQ, non ?

Certes cher collègue

[snopsy]

bonjour
les post datent un peu mais j’espère avoir néanmoins une réponse
serait-il possible de choisir l’écran ?
pour pouvoir éteindre ou mettre en veille juste le moniteur secondaire et pas le principal
merci d'avance

[Mat.M]

GetMonitorInfo
http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx