有没有办法获取Alt+Ctrl+Delete的消息？

sea_bug

一直没找到这个消息，不知道是否有人知道这个触发方式？

wxhwhmanshan

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

Private Const SPI_SCREENSAVERRUNNING = 97
Private Sub Command1_Click()
    Dim ret As Integer
    Dim pOld As Boolean
               
    If Command1.Caption = "屏蔽" Then   '使Ctrl+Alt+Del有效
        ret = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, pOld, 0)
        Command1.Caption = "有效"
    Else                                '使Ctrl+Alt+Del无效
        ret = SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, pOld, 0)
        Command1.Caption = "屏蔽"
    End If
End Sub

Private Sub Form_Load()
    Command1.Caption = "屏蔽"
End Sub

Private Sub Form_Unload(Cancel As Integer)
    Dim ret As Integer
    Dim pOld As Boolean
        
    '退出前使ALT+CTL+DEL有效
    ret = SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, pOld, 0)
End Sub

gigikouyi

VB?

flyv

http://blog.csdn.net/jiangsheng/archive/2003/11/09/3789.aspx

sea_bug

我并不是想阻止拦截Alt+Ctrl+Delete，而且在Alt+Ctrl+Delete被触发或者Alt+Ctrl+Delete结束的时候给应用程序发送的什么消息？

寂寞高手

不拦截Alt+Ctrl+Delete是得不到该消息的，因为你的程序是应用程序，不要以为你的程序是操作系统代码，别人打110，公安局会通知你？？？

sea_bug

楼上的说得有道理，我最初的考虑是蹲监狱总是要先判刑吧，Atl+Ctrl+Delete触发，也应该给其他应用程序通个风，发布一下判刑结果。呵呵。

♂樱♀

我觉得只能检查按键了似乎。

Chang_H

要用HOOK拦截这组按键。