Article #17450: Turning on Screen saver with code.

 Question and Answer Database
FAQ2450D.txt Turning on Screen saver with code.
Category :Windows API
Platform :All
Product :All 32 bit
Question:
How do I turn the Windows Screen Saver on in code?
Answer:
The following function tests to see if the WIndows Screen Saver is
available, and if so, turns it on:
function TurnScreenSaverOn : bool;
var
b : bool;
begin
result := false;
if SystemParametersInfo(SPI_GETSCREENSAVEACTIVE,
0,
@b,
0) <> true then exit;
if not b then exit;
PostMessage(GetDesktopWindow, WM_SYSCOMMAND, SC_SCREENSAVE, 0);
result := true;
end;
7/16/98 4:31:28 PM

Last Modified: 01-SEP-99