1 Desabilitar o Ctrl+Alt+Del Qui Fev 28, 2013 4:06 pm
Moedas : 278
Mensagens : 1177
Idade : 26
Humor : Forever Alone T.T
Reputação : 28
Mensagens : 1177
Idade : 26
Humor : Forever Alone T.T
Reputação : 28
RodrigoNunes
Esse código desabilita os botões Ctrl+ Alt + Del, Ctrl + Esc e Alt+Tab.
Para usar em sua aplicação adicione o código e edite-o depois
Para usar em sua aplicação adicione o código e edite-o depois
- Código:
procedure TNomeDoForm.ButtonNameClick(Sender: TObject);
var
Numero : Integer;
begin
SystemParametersInfo (97, Word (True), @Numero, 0);
end;
E para reabilitar, utilize a rotina abaixo:
procedure TNomeDoForm.ButtonName2Click(Sender: TObject);
var
Numero : Integer;
begin
SystemParametersInfo(97, Word (False), @Numero, 0);
end