Mettre (ou retirer) le moniteur en (de la) veille

Commenter

Contenu du snippet

Le code est très simple, ici il est sous forme de procédure. Donc si vous voulez l'ajouter a votre projet il suffit de déclarer la procédure (avant implementation) et de copier le corps de la procédure.

Source / Exemple : 


uses Windows, Messages;

//Declaration des constantes que l'on va utiliser
Const MONITOR_OFF : Short = 2;
Const MONITOR_ON : Short = -1;

procedure Moniteur_Veille(hWnd: THandle; Valeur: boolean);
begin
  if Valeur then //si Valeur est a TRUE on met le moniteur en veille
    SendMessage(hWnd, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_OFF)
  else  //sinon on le retire de la veille
    SendMessage(hWnd, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_ON);
end;

Conclusion :


Pour l'utilisation c'est aussi simple que le code, petit exemple dans un FormCreate:

//Handle est l'handle de la Form (on pourrait mettre Self.Handle ou encore Form1.Handle ca reviendrait au même)

Moniteur_Veille(Handle, True) //On met le moniteur en veille.
Moniteur_Veille(Handle, False) //On retire le moniteur de la veille.

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (taye78)