Fórum Ctrl Alt Del Alt Tab Alt F4..como evitar.... #140722
25/02/2003
0
Anonymous
Curtir tópico
+ 0Posts
25/02/2003
Dor_poa
(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
25/02/2003
Dbezerra
nos windows com arquitetura nt, como o 2000 e o XP, a coisa fica mais complicada...
Gostei + 0
25/02/2003
Jc
Como faço pra cancelar o ALT+F4. Esse código faz isso?
Gostei + 0
27/02/2003
Anonymous
Onde posso obter informações desse tipo?
Obrigado
Gostei + 0
28/04/2003
Rodrigo_rcp
begin
if key=vk_f4 then
abort;
end;
end.
Gostei + 0
28/04/2003
Lady
Você sabe como fazer para NT, 2000 e XP?
Gostei + 0
29/04/2003
Rodrigo_rcp
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_f4 then
abort;
end;
end.
Gostei + 0
29/04/2003
Cabelo
Lenbrando que a biblioteca é a ShellApi.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)