Mega Code Archive

 

Categories / Delphi / Examples

 

Disable task switching

This article demonstrates how to enable / disable task switching. var OldValue : LongBool; begin {turns the trap on} SystemParametersInfo(97, Word(True), @OldValue, 0); {turns the trap off} SystemParametersInfo(97, Word(False), @OldValue, 0); end;