关闭显示器的用法？？？

我在程序员杂志上看到：
关闭显示器：  
sendMessage(Application.Handle,wm_Syscommand,sc_monitorpower,0);
打开显示器：
sendmessage(Application.handle,wm_Syscommand,sc_monitorpower,-1);
可是我在程序中加入一个按钮，用按钮实现这个功能，但是却没有其任何作用，我刚刚接触delphi 希望大家能给我解释解释到底为什么