Jag är en nybörjare på programmering och behöver hjälp med att låsa tangentkombinationerna Ctrl+Al+Del och Alt+Tab. Jag hittade en programsnutt enl. nedan, men det fungerar inte. Vad saknas? Klassiskt problem, går "inte" att lösa på något bra sätt.Ctrl+Alt+Del
I en modul har jag följande deklaration
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
I ett formulär har jag detta:
Dim lngA As Long, lngDISABLED As Long
Private Sub Command1_Click()
lngDISABLED = False
lngA = SystemParametersInfo(97, lngDISABLED, CStr(1), 0)
End Sub
Private Sub Form_Load()
lngDISABLED = True
lngA = SystemParametersInfo(97, lngDISABLED, CStr(1), 0)
End Sub
Sv: Ctrl+Alt+Del
Ta en titt på t.ex.:
http://www.codeproject.com/win32/AntonioWinLock.asp
http://www.codeproject.com/system/preventclose.asp