delphi 关闭显示器

本文整理自网络，侵删。

 {关闭显示器} 

SendMessage(FindWindow(nil,nil), WM_SYSCOMMAND, SC_MONITORPOWER, 1);
//关闭显示器 根据MSDN，这个参数如果是1，则 表示显示器处于低能耗状态。


{打开显示器} 

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

 

相关阅读 >>

Delphi 代替pos的函数

Delphi中dbgrid控件数据库点击某列按序排列

Delphi 读取全网站链接

Delphi 根据文件扩展名判断文件类型函数写法

Delphi 主程序与dll之间的全局变量问题

Delphi rgbtohsb

Delphi 取得文件夹及下一级文件夹下的文件列表

Delphi内存映射 与 映射数据获取

Delphi tfinddialog treplacedialog对话框在memo中的使用

Delphi 优化mdb文件

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 关闭显示器