Desabilitar ALT TAB, ou só ALT, ou só TAB???? (Correção)

05/02/2003

0

Gostaria de desabilitar as teclas ALT e TAB. Tenho o WinXP e o seguinte comando não funciona:

procedure TfrmRelatorio.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);

keypreview:=true;
if (Key = VK_Tab) and (ssAlt in Shift) then
Key := 0;

EXISTE OUTRA MANEIRA?????????

AGRADEÇO DESDE JÁ...


Anonymous

Anonymous

Responder

Posts

05/02/2003

Dor_poa

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;


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar