блокировать отключение монитора

[beegl]

привет всем, как программно блокировать отключение монитора?

[raxp]

Через SystemParametersInfo():

SystemParametersInfo(SPI_SETPOWEROFFTIMEOUT, 0, nil, SPIF_UPDATEINIFILE);

...или из JEDI модуль JwaPowrProf:

var pGlobalPowerPolicy: GLOBAL_POWER_POLICY;
    pPowerPolicy: POWER_POLICY;
begin
 GetCurrentPowerPolicies(@pGlobalPowerPolicy, @pPowerPolicy); // текущие установки

 pPowerPolicy.user.VideoTimeoutAc   := 0; // отключение дисплей
 SetActivePwrScheme(0, @pGlobalPowerPolicy, @pPowerPolicy);

[beegl]

Сообщение от raxp

Через SystemParametersInfo():

SystemParametersInfo(SPI_SETPOWEROFFTIMEOUT, 0, nil, SPIF_UPDATEINIFILE);

...или из JEDI модуль JwaPowrProf:

Спасибо! .. Что-то не нашел модуль JwaPowrProf, хотя компоненты JEDI на компе есть.

Подскажите, как разрешить отключать монитор?