Delphi 软关闭显示器的代码

本文整理自网络，侵删。

 
// Monitor Off
procedure MonitorOff;
begin
  SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, 2);
end;


procedure TForm1.Button1Click(Sender: TObject);
begin
MonitorOff;
end;
 

相关阅读 >>

Delphi基于prewitte算子的图像边缘检测

Delphi tnethttpcleint提交json串

Delphi tooltip提示窗口单元

Delphi实现电脑桌面壁纸更换

Delphi 谷歌api文本转换语音mp3文件

Delphi xe7使用本身的md5单元进行字符串加密

Delphi 字符串是否包含

Delphi 下载函数

Delphi fdmemtable内存表操作

Delphi 检验指定字符串网址是否输入正确

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

转载请注明出处：木庄网络博客 » Delphi 软关闭显示器的代码