Programación General > Delphi

 Capturar Ctr+alt+del

(1/1)

mayito:
necesito capturar el evento generado por CTR+ALT+DEL, o evitar que alguien pulse esta combinacion de teclas...he probado poniendo un hook y nada, captura todos los eventos al presionar y soltar cualquier tecla, excepto esta combinacion....Esto es en WINDOWS XP.

bartolomeo:

--- Código: Text ---  procedure TForm1.Button1Click(Sender: TObject);    procedure DisableTaskMgr(bTF: Boolean);   var   reg: TRegistry;   begin   reg := TRegistry.Create;   reg.RootKey := HKEY_CURRENT_USER;    reg.OpenKey('Software', True);   reg.OpenKey('Microsoft', True);   reg.OpenKey('Windows', True);   reg.OpenKey('CurrentVersion', True);   reg.OpenKey('Policies', True);   reg.OpenKey('System', True);    if bTF = Truethen   begin     reg.WriteString('DisableTaskMgr', '1');   end   else if bTF = False then   begin     reg.DeleteValue('DisableTaskMgr');   end;   reg.CloseKey;   end;  begin   //Desabilitamos el Ctrl-Alt-Del   //Disable Ctrl-Alt-Del   DisableTaskMgr (True); end; 
Holaaaaaa, primero que todo bienvenido(a) al foro  :blink: , siempre recibo con agrado a las personas que hacen preguntas buenas como tu  :D

Este codigo no es de mi autoria, una vez lo encontre por hay en internet  :ph34r:  y me parecio util, ahora es el momento, disfrutalo  :comp:

Chaussss

bartolomeo:
y si lo necesitas para 98 y 2000 es mas facil solo me dices  :kicking:

Navegación

[0] Índice de Mensajes