如何讓 Ctrl+Alt+Del 組合鍵無效？

zhengjialon

原始來源:王國榮

想要讓 Ctrl+Alt+Del 組合鍵無效(不會調出 Windows 95的「關閉視窗」交談窗)，
可呼叫SystemParametersInfo API 函數， 細節如下：

API 的宣告：

Const SPI_SCREENSAVERRUNNING = 97

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

    Dim pOld As Boolean
    Call SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, pOld, 0)

如果想將 Ctrl+Alt+Del 的功能還原， 則是：

    Dim pOld As Boolean
    Call SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, pOld, 0)

註：此一方案只適用於 Windows 95， NT 並不適用。