程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> Delphi >> Delphi也可以“軟關閉”顯示器

Delphi也可以“軟關閉”顯示器

編輯:Delphi

軟關閉也就是用軟件關閉電腦的顯示器,並沒有真正切斷電源,但顯示器物理耗電會降至最低,等同於關閉。寫這款軟件的初衷是測試,後來想到顯示器的按鈕是有使用次數的,經常使用按鍵關閉顯示器,會減少按鍵開關的壽命,因為自己是寫Delphi的,所以就想到了用一個Delphi小程序來實現顯示器的“軟關閉”,程序比較簡單,就一句代碼:

1、新建應用程序,添加一個按鈕,為按鈕添加如下代碼:

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 2);

最後那個參數1或2都可以,我沒有發現有什麼不同。或者這樣也可以:

Perform(WM_SYSCOMMAND, SC_MONITORPOWER, 1);

2、編譯源碼並運行,點擊按鈕,成功關閉顯示器!(我是用WinXP SP3 + Delphi7)

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved