Программирование Delphi

Если Вы хотите отключить эти сочетания клавиш, выполните процедуру SystemKeys. Когда Вы вызываете SystemKeys и переменной Disable присвоено значение True, клавиши будут заблокированы, если False - наоборот.

Обратите внимание: код не работает под WinNT (XP, 2000)!

procedure SystemKeys(Disable: Boolean) ;
  var OldVal : LongInt;
begin
  SystemParametersInfo(SPI_SCREENSAVERRUNNING, 
                       Word(Disable), @OldVal, 0) ;
end;