FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
eliminar ALT+TAB, CTRL+ESC, tecla inicio...
Hola a todos,
Tengo una aplicacion que debe estar siempre activa y me gustaria saber si por programacion se puede hacer que no funcionen las teclas: ALT+TAB CTRL+ESC Tecla de inicio y demas botones avanzados de los teclados, esos que te permiten abrir el navegador, el reproductor de cd's, leer el correo ...etc Gracias, David. |
#2
|
||||
|
||||
Lo de los botones avanzados no sé ya que son dependientes del hardware específico. Pero otras teclas o combinaciones de teclas las puedes tratar con un hook del teclado a bajo nivel. Puedes ver un ejemplo en la unidad hooks.pas de mi página.
// Saludos |
#3
|
||||
|
||||
no va...
Lo he probado tanto en win2000 como en winXP y no funciona, he puesto un boton y un chekbox: LockKey(lkAltTab,CheckBox1.checked); LockKey(lkAltEsc,CheckBox1.checked); LockKey(lkCtrlEsc,CheckBox1.checked); LockKey(lkAltF4,CheckBox1.checked); LockKey(lkWin,CheckBox1.checked); LockKey(lkApps,CheckBox1.checked); pero no funciona, sabes porque?? gracias, david. |
#4
|
||||
|
||||
¿Ya llamaste a la función SetHook?
// Saludos |
#5
|
||||
|
||||
ya funciona!
gracias roman, me faltaba la llamada al gancho.
|
#6
|
|||
|
|||
Disculpa Roman, Pero necesito de tu ayuda
Copie el codigo de inahabilitar las teclas de tu pagina y la pasé tal como está en mi programa pero no funciona, estoy trabajando con delphi 6 y winXp.
En el momento de compilarlo me marca el siguiente error en la linea:TLockableKey = (lkAltTab, lkAltEsc, lkCtrlEsc, lkAltF4, lkWin, lkApps); y el error es el siguiente:Expected':'but'=' found y ademas todas las demas palabras no las reconoce ¿Cual podria ser el problema? Por favor ayudameeeeeeee. |
|
|
|