Jump to content
Fivewin Brasil

Desabilitar teclado


Ariston Santos

Recommended Posts

Olá pessoal.

Como faço para desabilitar as telcas CTRL+ALT+DEL no XP? Já testei as funções disponíveis em dicas, mas uma delas funciona com perfeição apenas no Win98 e a outra, que funciona bem no XP, trava também o teclado e o mouse. Preciso de uma que apenas desabilite o pressionamento de CTRL ALT DEL sem travar as demais teclas e o mouse, e que rode em qualquer versão do Ruindows.

A quem puder me dar uma dica, meus agradecimentos.

Ariston

Link to comment
Share on other sites

#include "fivewin.ch"

#include "dll.ch"

procedure main()

CtrlAltDel( .f. )

MsgAlert( "CTRL-ALT-DEL DESLIGADO" + CRLF + "Please, press CTRL + ALT + DEL", "Desligado" )

CtrlAltDel( .t. )

MsgAlert( "CTRL-ALT-DEL LIGADO" + CRLF + "Please, press CTRL + ALT + DEL", "Ligado" )

return

//---------------------------------------------------------------------------//

Procedure CtrlAltDel( lState )

if !lState

SysParInfo( 97, 1, 0, 0 )

else

SysParInfo( 97, 0, 0, 0 )

endif

return

//---------------------------------------------------------------------------//

dll32 static function SysParInfo( uAction AS LONG, uParam AS LONG, vParam AS LONG, uWinIni AS LONG ) ;

AS LONG PASCAL FROM "SystemParametersInfoA" LIB "User32.dll"

//---------------------------------------------------------------------------//

Bad Boy - The HuntsMan Of E.A.J. Automação Comercial.

kapiaba@brfree.com.br

FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...