Идёт загрузка страницы...

htp://aptem.net.ru





Управление монитором

Выключить монитор:


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

Включить монитор:


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

Исправление

_гораздо_ корректнее


    SendMessage(HWND_BROADCAST,WM_SYSCOMMAND, 0)

или


    SendMessage(HWND_BROADCAST,WM_SYSCOMMAND, -1)

а вариант с Application.handle вообще по-моему нерабочий , ну если и рабочий то в глубоко частном случае !

С уважением, Antony Peter Sadovnikoff.

Дополнение:

Nomadic добавляет еще один способ:


    SetSystemPowerState(true,true);

[000020]