Az összes rendszer billentyűkombináció letiltása és vissszakapcsolása (Meik Weber):

procedure TurnSysKeysOff; //Kikapcsolja
var OldVal : LongInt;
begin
   SystemParametersInfo (97, Word (True), @OldVal, 0)
end;

procedure TurnSysKeysBackOn; //Bekapcsolja
var OldVal : LongInt;
begin
   SystemParametersInfo (97, Word (False), @OldVal, 0)
end;



Egy másik megoldás (Richard Leigh):

procedure TurnSysKeysOff; //Kikapcsolja
var Dummy:integer;
begin
   Dummy:=0;
   SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @Dummy, 0);
end;

procedure TurnSysKeysOn; //Bekapcsolja
var Dummy:integer;
begin
   Dummy:=0;
   SystemParametersInfo( SPI_SCREENSAVERRUNNING, 0, @Dummy, 0);
end;