Desactivar la tecla system

En ocasiones no queremos que el usuario tenga acceso al botón inicio de Windows; lo que hacemos entonces es cerrarlo.
Declare Long FindWindow In "user32" ;
    String lpClassName, String lpWindowName
Declare Long SendMessage In "user32" ;
   Long HWnd,Long wMsg, Long wParam, Long Lparam
Declare Long FindWindowEx In "user32" ;
   Long hWnd1, Long hWnd2, String lpsz1, String lpsz2
#Define WM_CLOSE 0x10
SendMessage(FindWindowEx(FindWindow("Shell_TrayWnd",""), 0x0, "Button", .Null.), WM_CLOSE, 0, 0)
El asterisco ( * ) permite inhabilitar algunas cositas de VFP... en este caso, no funcionaran las combinaciones de teclas para copiar (CTRL+C), Pegar (CTRL+V).
ON KEY LABEL CTRL+V *
ON KEY LABEL CTRL+C *
Cuando el usuario presione dichas combinaciones de teclas no harán nada. Y de igual forma puedes hacer con todas las teclas.
Quieres que tu programa nunca mande un error... mejor dicho ¿quieres esconder tus errores? ... ¿Interesante no?
On Error *
Y si deseas evitar que el usuario salga del programa ..
On Shutdown *
Prueba con otras opciones y comprobaras lo útil que es el asterisco ( * )

Encontré entre mis cosas esta función espero te sirva
*
** FUNCTION DesactivarTeclasWindows(tlEstado)
** Funcion para Desactivar las Teclas CRTL + ALT + SUPR de Windows
*
** Parametros
**    tlEstado   =  Estado de las Teclas  (VALOR LOGICO)
**          .T.  = Desactiva las Teclas
**          .F.  = Activa las Teclas
*
*
**************************************************************************
*
FUNCTION DesactivarTeclasWindows(tlEstado)
 DECLARE INTEGER SystemParametersInfo IN USER32.DLL ;
 LONG uAction, ;
 LONG uParam, ;
 STRING lpvParam, ;
 LONG fuWinIni
 uAction = 97
 lpvParam = '0'
 fuWinIni = 0
 If tlEstado = .T.
  *--- deshabilita las teclas
  uParam = 1
  tnResultado = SystemParametersInfo(@uAction,@uParam,lpvParam,@fuWinIni)
   Else
  *--- habilita las teclas
  uParam = 0
  tnResultado = SystemParametersInfo(@uAction,@uParam,lpvParam,@fuWinIni)
 EndIf
RETURN tnResultado
ENDFUNC
*
** Fin DesactivarTeclasWindows()