Ayuda con una api en especial
Publicado por keybian padilla (1 intervención) el 23/08/2002 02:02:57
yo con el siguiente codigo suspendo las teclas de escapes pero solo con win 9x y me por favor ayuda con 2000 profesional
Public Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_SCREENSAVERRUNNING = 97&
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0&, 0&, 0&)
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1&, 0&, 0&)
Public Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_SCREENSAVERRUNNING = 97&
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0&, 0&, 0&)
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1&, 0&, 0&)
Valora esta pregunta
0