delphi 关闭显示器

本文整理自网络，侵删。

 {关闭显示器} 

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


{打开显示器} 

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

 

相关阅读 >>

Delphi mediaplayer 左声道右声道

Delphi 递归遍历treeview树节点

Delphi 世界时间转换

Delphi启动/停止windows服务,启动类型修改为"自动"

Delphi filecreate 建立新文件

Delphi弹出信息框大全

Delphi 输出用空格对齐字符串的函数

Delphi之如何快速开发原生activex控件

Delphi删除目录及子目录及所有目录下的文件

Delphi winapi: getdesktopwindow - 返回桌面窗口的句柄

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

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