#define SPI_GETSCREENSAVERRUNNING 114 DECLARE SHORT SystemParametersInfo IN Win32API; INTEGER uiAction, SHORT uiParam,; INTEGER @pvParam, INTEGER fWinIni IF (SystemParametersInfo(SPI_GETSCREENSAVERRUNNING, 0, @lnvparm, 0) # 0) * The call succeeded * If lnvparm does not equal 0 it's running ENDIF