Cita:
Empezado por emeceuy
hola ! no hay forma de hacer esto?
|
no como uno
quisiera;
Código Delphi
[-] repeat Sleep(1000);
SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, 1);
until OnMonitor;
SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, -1);
ó
Código Delphi
[-] SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, 1);
BlockInput(True);
SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, -1);