// These routines are based on information from the Microsoft Knowledgebase
  // article Q161133, "How to Block CTRL+ALT+DEL and ALT+TAB in Windows 95."
  // Note:  According to this documentation, the routines below will NOT work
  // under Windows NT.

  // Routine names adapted from suggestion by Geir Bratlie (royal@sn.no) in
  // 12/8/96 post to comp.lang.pascal.delphi.misc, "Re:  Help - Trapping KB
  // Keys"

  PROCEDURE TurnSystemKeysOff;
    VAR
      dummy:  INTEGER;
  BEGIN
    SystemParametersInfo(SPI_SCREENSAVERRUNNING, INTEGER(TRUE), @Dummy, 0)
  END {TurnSystemKeysOff};


  PROCEDURE TurnSystemKeysOn;
    VAR
      dummy:  INTEGER;
  BEGIN
    SystemParametersInfo(SPI_SCREENSAVERRUNNING, INTEGER(FALSE), @Dummy, 0)
  END {TurnSystemKeysOn};