Книга: Delphi. Учимся на примерах

Шутка №7 — выключение монитора

Шутка №7 — выключение монитора

Седьмая шутка будет выключать монитор. Для этого достаточно написать одну строку кода:

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

Содержание
Шутка №1 — ограничение диапазона движения мыши
Шутка №2 — отключение кнопок мыши
Шутка №3 — отключение клавиатуры
Шутка №4 — очистка буфера обмена
Шутка №5 — назначение фона для Рабочего стола
Шутка №6 — выбор фона случайным образом
Шутка №7 — выключение монитора
Шутка №8 — сообщение об ошибке, содержащее "мусор"
Шутка №9 — открытие браузера Internet Explorer
Шутка №10 — сброс системной даты/времени
Оглавление статьи/книги
Похожие страницы

Генерация: 1.032. Запросов К БД/Cache: 3 / 0
поделиться
Вверх Вниз