Código de FoxPro/Visual FoxPro - Desactivar teclas CRTL + ALT + SUP

<<>>

Desactivar teclas CRTL + ALT + SUPgráfica de visualizaciones


FoxPro/Visual FoxPro

estrellaestrellaestrellaestrellaestrella(5)
Publicado el 04 de Marzo del 2002 por Carlos
18.135 visualizaciones desde el 04 de Marzo del 2002. Una media de 28 por semana
Esta funcion la pueden copiar en su archivo de Rutinas e invocarla desde cualquier parte de su programa. (Visual FoxPro)

Versión 1
estrellaestrellaestrellaestrellaestrella(5)

Publicado el 04 de Marzo del 2002gráfica de visualizaciones de la versión: Versión 1
18.136 visualizaciones desde el 04 de Marzo del 2002. Una media de 28 por semana
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
***************************************************************************
*
** 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
*
*** Rutina suministrada por: ROD       -  eendor@hotmail.com
*** Ultima Modificacion:     Foxperto  -  foxperto@yahoo.com
***                          Marzo 01 2002
*
**************************************************************************
*
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()
*



Comentarios sobre la versión: Versión 1 (5)

Marcelo Mendoza
27 de Marzo del 2002
estrellaestrellaestrellaestrellaestrella
La funcion no sirve en Windows XP
Responder
Tomas
19 de Abril del 2002
estrellaestrellaestrellaestrellaestrella
como se puede hacer para que cuando se esten corriendo los programas no se vea la barra de estado
Responder
Fabian
21 de Agosto del 2002
estrellaestrellaestrellaestrellaestrella
La funcion no funca para NT, habria que investigar que archivo de NT cumple la misma funcion de user32.dll del Windows
Responder
HENRY ESPINO
19 de Mayo del 2004
estrellaestrellaestrellaestrellaestrella
sabes tu codigo me fue muy util, sabes me gustaria saber como puedo guardar en un archivo la pantalla actual capturada , por codigo o el print scree, por codigo

gracias
Responder
Jesús Barragán Vesga
22 de Agosto del 2004
estrellaestrellaestrellaestrellaestrella
Excepcional la rutina, pero presenta una falla que se presenta cuando luego de haber utilizado la rutina inicialmente para desactivar las teclas y luego para activarlas, si se vuelve a utilizar el ctrl+alt+supr, el equipo empieza a presentar problemas en el explorer y en general en todas las aplicaciones.

Agradeceria que foxperto nos regalará la corrección..
Responder

Comentar la versión: Versión 1

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios

http://lwp-l.com/s133