Eteindre l'écran de l'ordinateur (pas une mise en veille)

**Coussati** · 03/01/2007, 00h20

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** · 03/01/2007, 13h27

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** · 03/01/2007, 15h32

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** · 03/01/2007, 19h44

Envoyé par Thierry Laborde

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

Envoyé par Thierry Laborde

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

Certes cher collègue