掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
実行中のスクリーンセーバーを止めるには? (ID:6529)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
どんな状態からでも必ず画面に表示しなければならない処理があって そのときスクリーンセーバーを止める必要があるのですが どうしても止まりません。 実験用にスクリーンセーバーを1分起動にし、ボタン降下後1分20秒ほどで実行されるタイマーイベントを作り試しています。 タイマーイベントの中身は 1.マウスを動かして止めてみる var p : TPoint; x,y : Integer; begin GetCursorPos(p); x := p.x; y := p.y; x := x - 100; y := y - 100; SetCursorPos(x,y); Application.ProcessMessages; end; 2.SystemParametersInfoを使用する方法 SystemParametersInfo (SPI_SETSCREENSAVEACTIVE, LongInt(False), nil, SPIF_UPDATEINIFILE); を試しましたが止まりません。 環境はOSがXpでDelphiは5です。 どうかおねがいします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.