線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1059
推到 Plurk!
推到 Facebook!

请问如何退出windows屏幕保护?

答題得分者是:deity
allen-86
一般會員


發表:28
回覆:44
積分:19
註冊:2008-02-01

發送簡訊給我
#1 引用回覆 回覆 發表時間:2010-11-27 14:06:09 IP:117.95.xxx.xxx 訂閱
问题就是,如果机器长时间鼠标没动作,如果有设定windows屏保,那么会自动启动屏幕保护程序,

自己写的程序如何判断windows屏保已经运行,并且退出windows屏幕保护?


多谢!
------
The empty vessels make the greatest sound.
deity
尊榮會員


發表:90
回覆:876
積分:678
註冊:2003-05-09

發送簡訊給我
#2 引用回覆 回覆 發表時間:2010-11-29 16:08:29 IP:183.55.xxx.xxx 訂閱
var   
b: Bool;
begin
SystemParametersInfo(SPI_GETSCREENSAVEACTIVE, 0, @b, 0);//判断是否开启屏保
if b=true then
begin
SetCursorPos(0,0); //模拟鼠标移动 以关闭屏保
end;
end;

編輯記錄
deity 重新編輯於 2010-11-29 01:09:48, 註解 無‧
allen-86
一般會員


發表:28
回覆:44
積分:19
註冊:2008-02-01

發送簡訊給我
#3 引用回覆 回覆 發表時間:2010-11-29 17:30:11 IP:114.238.xxx.xxx 訂閱
SetCursorPos(0,0);
有用过,但是不行,现在的方法是结束进程。

===================引 用 deity 文 章===================
var
b: Bool;
begin
SystemParametersInfo(SPI_GETSCREENSAVEACTIVE, 0, @b, 0);//判断是否开启屏保
if b=true then
begin
SetCursorPos(0,0); //模拟鼠标移动 以关闭屏保
end;
end;

------
The empty vessels make the greatest sound.
系統時間:2017-10-18 19:09:25
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!