como desabilitar as teclas Ctrl esc e Ctrl Alt Del?
podem me ajudar sou meio que iniciante, ja tentei a dica do site do clube do delphi, mas não funcionou, se alguem puder me ajudar agradeço.
valeu
valeu
Hc
Curtidas 0
Respostas
Marcelo.c
07/05/2003
007 - Desabilitar Teclas Ctrl+Alt+Del
Ai vai um codigo que peguei no site da Borland que trava as teclas
(Ctrl+Alt+Del),(Alt+Tab), (Ctrl+Esc)
var
OldValue : LongBool;
begin
{liga a trava}
SystemParametersInfo(97, Word(True), @OldValue, 0);
{desliga a trava}
SystemParametersInfo(97, Word(False), @OldValue, 0);
end;
Ai vai um codigo que peguei no site da Borland que trava as teclas
(Ctrl+Alt+Del),(Alt+Tab), (Ctrl+Esc)
var
OldValue : LongBool;
begin
{liga a trava}
SystemParametersInfo(97, Word(True), @OldValue, 0);
{desliga a trava}
SystemParametersInfo(97, Word(False), @OldValue, 0);
end;
GOSTEI 0
Hc
07/05/2003
marcelo eu ja tentei essa linha de codigo, e só pra me certifica eu testei de novo e não funcionou as teclas continuam funcionando, por acaso o windows utilizado influencia? eu estou utilizando o XP?
GOSTEI 0
Vmotta
07/05/2003
esse comando funnciona até o ME :
var
i: LongInt;
begin
SystemParametersInfo(97,Word(true),@i,0);
end;
no XP e Windows 2000 nao funciona, tb estou procurando uma solução, se alguem achar a resposta me manda um e-mail por favor:
vmotta@eep.br
Obrigado
Vitor
var
i: LongInt;
begin
SystemParametersInfo(97,Word(true),@i,0);
end;
no XP e Windows 2000 nao funciona, tb estou procurando uma solução, se alguem achar a resposta me manda um e-mail por favor:
vmotta@eep.br
Obrigado
Vitor
GOSTEI 0