Программное включение и выключение монитора в Delphi

Отключить:

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

Включить:

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1);

После отключения монитора возможно потребуется перезагрузка.

Kwork.ru - услуги фрилансеров от 500 руб.
1 Звезда2 Звезды3 Звезды4 Звезды5 Звезд (11 оценок, среднее: 5,00 из 5)
Загрузка...
Добавить комментарий