Как отключить экран?

[egorzenit]

Здравствуйте. такой вопрос,как отключить экран в Windows 7 программно через Delphi? то есть,что-бы был черный экран а потом включить через несколько секунд?

[__123]

Ну, просто показать окно черного цвета, развернутое на весь экран, без границ. А как реально приостановить подачу сигнала на монитор, не знаю.

[FaTaL]

В DRKB были такие приколы, посмотрите там.

[EUGY]

SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, 2);
Sleep (1000);
mouse_event(MOUSEEVENTF_MOVE, 0,0,0,0);