COMO DESATIVO AS TECLAS ALT F4 E CTRL ALT DEL
URGENTE!!!! ALGUEM SABE COMO FAÇO PARA DESATIVAR AS TECLAS ALT F4 E CTRL ALT DEL??? [S51]
Se o seu sistema for Windows XP, para desativar o CTRL+ALT+DEL faça assim:
No Form, coloque um timer e altere o Interval dele para, por exemplo, 500 e adicione o código seguinte:
No Form, coloque um timer e altere o Interval dele para, por exemplo, 500 e adicione o código seguinte:
Private Sub Timer1_Timer()
On Error Resume Next
Kill sysdir & " askmgr.exe"
End Sub
Para desabilitar as teclas usadas pelo sistema, use a função API SystemParametersInfo. Geralmente os Protetores de Tela com senhas usam esta técnica para evitar que se cancele o protetor de tela sem saber a senha.
Rem Digite esta linha em General / Declarations
Private 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
Sub CtrlAltDel(Desabilita As Boolean)
Call SystemParametersInfo(97, bDisabled, "1", 0)
End Sub
Rem Para desabilitar basta chamar o sub
CtrlAltDel True
Rem Para reabilitar basta chamar o sub
CtrlAltDel False
Rem Digite esta linha em General / Declarations
Private 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
Sub CtrlAltDel(Desabilita As Boolean)
Call SystemParametersInfo(97, bDisabled, "1", 0)
End Sub
Rem Para desabilitar basta chamar o sub
CtrlAltDel True
Rem Para reabilitar basta chamar o sub
CtrlAltDel False
Tópico encerrado , respostas não são mais permitidas