[DELPHI] - Manipulating the Monitor

[Madboy]

To turn on:

Sendmessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,2); 

To turn off: 

Sendmessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,-1);