No replies to this topic

[enecumene]

Tal como reza el título, es muy sencillo:

delphi

{ Apaga el Monitor }
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0);
{ Enciende el Monitor }
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, - 1);

Cualquier pregunta sobre el truco, por favor abrir un hilo en el foro adecuado.

Saludos.