How to mask or open shortcuts in Windows

Shield VAR Dummy: Integer; Begin SystemParametersInfo (SPI_SETFASTSKSWITCH, 1, @dummy, 0); SystemParametersInfo (SPI_Screensaverrunning, 1, @dummy, 0);

Open VAR Dummy: Integer; Begin SystemParametersInfo (SPI_SETFASTSKSWITCH, 0, @dummy, 0); SystemParametersInfo (SPI_Screensaverrunning, 0, @dummy, 0); end;