Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как скинсэйвер


DeMoN-777 ©   (2002-10-22 17:22:00) 

Написал свой видеоплеер и не знаю как запретить винде запускать скрин, если играет клип или фильм. Как запретить ?


Kibitzer   (2002-10-23 00:12:00) [1]

Узнать текущее состояние ScreenSaver и PowerOff:
var
aScreenSave: BOOL;
aPowerOff: BOOL;
...
SystemparametersInfo(SPI_GETSCREENSAVEACTIVE, 0, @aScreenSave, 0);
SystemparametersInfo(SPI_GETPOWEROFFACTIVE, 0, @aPowerOff, 0);


Выключить ScreenSaver и PowerOff:
SystemparametersInfo(SPI_SETSCREENSAVEACTIVE, cardinal(False), nil, 0);
SystemparametersInfo(SPI_SETPOWEROFFACTIVE, cardinal(False), nil, 0);


Включить ScreenSaver и PowerOff:
SystemparametersInfo(SPI_SETSCREENSAVEACTIVE, cardinal(True), nil, 0);
SystemparametersInfo(SPI_SETPOWEROFFACTIVE, cardinal(True), nil, 0);


По моему это самый правильный способ, хотя раньше я пользовался немного другим, но он мне не очень нравится.

ps. Если последним параметром поставить SPIF_UPDATEINIFILEвместо 0, то настройки будут сохраняться.


DeMoN-777   (2002-10-23 00:02:00) [2]

?


DeMoN-777   (2002-10-22 19:27:00) [3]

Song, помогите. Вы у нас мастер по скринсэйверам =)


Наверх

Титульная страница Поиск, карта сайта Написать письмо