Hardware Delphi

Title: Set the monitor in to power-save mode
Question: How do I set the monitor to pwer-save mode?
Answer:
Turn monitor off with:
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0);
Turn monitor on with:
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1);