Visual Basic - Problema con ctrl + alt + supr

Life is soft - evento anual de software empresarial
 
Vista:

Problema con ctrl + alt + supr

Publicado por Borja (2 intervenciones) el 17/02/2003 13:11:50
En un proyecto tengo el siguiente codigo en un modulo:

Public Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long

Public Const SPI_SCREENSAVERRUNNING = 97

Public Sub ToggleCtrlAltDel(IsEnabled As Boolean)
Dim lReturn As Long
Dim lBool As Long
lReturn = SystemParametersInfo(SPI_SCREENSAVERRUNNING, IsEnabled, lBool, vbNull)
End Sub

Y llamo a esta funcion desde un formulario de la siguiente manera:

ToggleCtrlAltDel (True)

Supuestamente esto bloquea la combinacion de teclas ctrl + alt + supr, sin empargo, al ejecutar el proyecto y pulsar esta combinacion, sigue apareciendo la ventana para acceder al administrador de tareas. ¿Que puede estar mal en ese codigo?.

Gracias de antemano por el tiempo prestado

Borja.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problema con ctrl + alt + supr

Publicado por Rodolfo del Peru (454 intervenciones) el 17/02/2003 20:34:44
El parametro que necesita es un boolean que decide se se activa o no la combinacion, tu le estas pasando "True", es decir la estas activando, cambia a "False" y se arregla.

Saludos desde Lima
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con ctrl + alt + supr

Publicado por Borja (2 intervenciones) el 19/02/2003 10:18:00
Gracias Rodolfo por tu ayuda, tal como leia en la documentacion que encontre por diversos medios entendia justo lo contrario, efectivamente probe a hacer esa modificacion y funciono tal como esperaba. LO dicho, gracias por todo y saludos desde España.

Borja.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar