モニターの電源をオン/オフするにはどうすればいいですか？

Question

をデルファイスクリプトから、のWindows XPから7まで有効にしたいと思っていました。

私はデルファイのセクションをstackoverflowで検索して答えを見つけられませんでした。

私はWindows 7（XPのみ）ではもはや動作しない多くのサンプルを発見しました。私は正常にWindows XPのとのWindows 7上でこれをテストしている

Answer 1

：

const 
    MONITOR_ON  = -1; 
    MONITOR_OFF  = 2; 
    MONITOR_STANDBY = 1; 

をモニターをオフにするには：

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_OFF); 

モニターをオンにするには：

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_ON);