How to Check if Screensaver is on

Keywords:   screensaver 

---

Question:

Does any one know how to determine when a screen saver kicks in under NT 4.0 SP3? I'm using WinBatch & Compiler Intel 32 97D.

Answer:

It kinda depends on the screen saver. Step ONE would be to delete all the 16-bit screen savers and only use 32 bit ones.

To get the screen saver exe name (it will be a *.scr file, as in screensaver.scr) do...

	a=IniReadPvt("Boot","SCRNSAVE.EXE","NONE","SYSTEM.INI")

To test if it is active....

	a=IniReadPvt("Boot","SCRNSAVE.EXE","NONE","SYSTEM.INI")
	b=AppExist(a)
	if b==1
	  Message(a,"Screen saver active")
	endif

In Windows/NT the current Screensaver settings are stored in:

HKEY_CURRENT_USER\Control Panel\Desktop\

SCRNSAVE.EXE = exe name
ScreenSaveActive = 1=enabled, 0 = disabled
ScreenSaverIsSecure = 1=password, 0 = no password.
ScreenSaveTimeOut = # of seconds until screensaver is activated. 

---

Article ID:   W13814

Filename:   Checking if Screensaver is on.txt