Delphi 软关闭显示器的代码

本文整理自网络，侵删。

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


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

相关阅读 >>

delph 自带url编码函数 tnetencoding

Delphi 详解variant 的相关函数

Delphi 时间到就触发事件

Delphi firemonkey 学习笔记 �c tpopup 控件的使用

Delphi调节音量及静音

Delphi中调用api函数exitwindowsex可以实现系统的关机，注销，和重启

Delphi b编码以及bt种子文件分析

Delphi 获取/设置桌面窗口样式的Delphi代码

Delphi str1.compare 比较两个字符是否相同

Delphi 让嵌入窗体的 webbrowser 控件无边框

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

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