How to Prevent Screen Saver and Power Monitor on Windows?

[carlosnatal]

For a program presentation i need a rotiine that block power monitor and screen saver program. Do can you help me?

[Zvoni]

For a program presentation i need a rotiine that block power monitor and screen saver program. Do can you help me?

For your program presentation, switch it off in Windows Settings......

[Fibonacci]

Try this: https://learn.microsoft.com/en-us/windows/win32/api/winbase/nf-winbase-setthreadexecutionstate

Code: Pascal  [Select][+][-]

1. SetThreadExecutionState(ES_CONTINUOUS or ES_SYSTEM_REQUIRED or ES_DISPLAY_REQUIRED);

[Zvoni]

Try this: https://learn.microsoft.com/en-us/windows/win32/api/winbase/nf-winbase-setthreadexecutionstate

Code: Pascal  [Select][+][-]

1. SetThreadExecutionState(ES_CONTINUOUS or ES_SYSTEM_REQUIRED or ES_DISPLAY_REQUIRED);

From the link above:

This function does not stop the screen saver from executing.

[Remy Lebeau]

Programmatically prevent Windows screensaver from starting

[RayoGlauco]

I use this procedure, which I call periodically with a TTimer:

Code: Pascal  [Select][+][-]

1. procedure AvoidIdle;
2. // Creates a null mouse move
3. // uses JwaWinUser
4.  var
5.   Input: TInput;
6. begin
7.   Input.mi.dx := 0; // remove a warning
8.   FillChar(Input, SizeOf(Input), 0);
9.   Input.mi.mouseData := 0;
10.   Input.mi.dx := 0;
11.   Input.mi.dy := 0;
12.   Input.type_ := INPUT_MOUSE;
13.   Input.mi.dwFlags := MOUSEEVENTF_MOVE;
14.   SendInput(1, @Input, SizeOf(Input));
15. end;