Mega Code Archive

 

Categories / Delphi / System

 

How to enable and disable task switching

Title: How to enable and disable task switching Question: Never need to disable the user the ability to switch between applications? I needed it and I found a simply solution... Answer: Thats not a very professional way to do it, but it works! We simulate the start and the end of a screen saver. Simply, not? Procedure TaskSwitchingStatus( State : Boolean ); Var OldSysParam : LongInt; Begin SystemParametersInfo( SPI_SCREENSAVERRUNNING, Word( State ), @OldSysParam, 0 ); End;