请问:用Delhpi如何关闭显示器?(移动鼠标不会恢复)(100分)

  • 主题发起人 主题发起人 SilverEagle
  • 开始时间 开始时间
S

SilverEagle

Unregistered / Unconfirmed
GUEST, unregistred user!
请问:用Delphi如何关闭显示器?(移动鼠标不会恢复)<br>又如何恢复呢?
 
Perform(WM_SYSCOMMAND,SC_MONITORPOWER,1)<br>然后用鼠标钩子屏蔽鼠标[:)]
 
关闭显示器: <br>SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0);<br>打开显示器:<br>SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1);
 
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 1);<br>
 
关闭显示器:<br>PostMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,1);<br>打开显示器:<br>PostMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,0);<br>
 
用鼠标Hook是屏蔽不了的。
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部