[[cHackAll]]

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);