Ctrl Alt Del Alt Tab Alt F4..como evitar....

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;

esta solucao funciona somente para 98 e me...

nos windows com arquitetura nt, como o 2000 e o XP, a coisa fica mais complicada...

Como faço pra cancelar o ALT+F4. Esse código faz isso?

Como faço para desabilitar as teclas no xp/2000 ??

Onde posso obter informações desse tipo?

Obrigado

OnKeyPress
begin
if key=vk_f4 then
abort;
end;
end.

Você sabe como fazer para NT, 2000 e XP?

Ops :lol: para bloquear f4 no XP é assim
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_f4 then
abort;
end;

end.

Só complementando as respostas, depende do Sistema Operacional que vc estiver utilizando, arquitetura de Windows 95 aceita todas as sugestões apresentadas acima, mas se estiver utilizando um SO com arquitetura NT é necessário criar uma Thread que irá localizar e utilizar o Hook das teclas para que elas sejam travadas dinamicamente, isto é dentro do programa, se o SO for arquitetura 95 a primeira sugestão é a mais aceita.
Lenbrando que a biblioteca é a ShellApi.