![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Capturar las teclas Alt+TAb
Estoy intentando crear una especie de 'Tasklist' con los formularios que el usuario tiene abiertos de la aplicación. La idea es 'capturar' el Alt+Tab de Windows para mostrar los formularios minimizados por el usuario (si los hay) y permitirle al usuario cambiar rapidamente de formulario.
El control de los formularios ya me funciona bien, solo me falta el que la aplicación procese el Alt+Tab,, me salta siempre el de windows,, si lo pongo una tecla rápida como por ejemplo Ctrl+J, me funciona perfectamente,, este es el código, agradeceria me indicasen que estoy haciendo mal. Código:
procedure TfrmPrincipal.AppMessage(var Msg: tagMSG; var Handled: Boolean); begin if (Msg.message = WM_SYSCOMMAND) then begin if (LOWORD(Msg.lParam) = MOD_ALT) and (HIWORD(Msg.lParam) = VK_TAB ) then ShowMessage('Pulsaste las teclas "ALT + TAB"'); end; end; initialization RegisterHotKey(Application.Handle, GlobalAddAtom('MiHotKey'), MOD_ALT, VK_TAB); finalization UnregisterHotKey(Application.Handle, GlobalAddAtom('MiHotKey')); |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Capturar las teclas presionadas | lfb | C++ Builder | 6 | 27-09-2010 08:40:57 |
Capturar todas las teclas. | rauros | API de Windows | 4 | 17-09-2008 09:43:07 |
Capturar teclas en form | ivanloco | Varios | 3 | 21-07-2008 12:10:25 |
Problemas al capturar teclas | Dexter182 | Varios | 2 | 09-10-2005 22:36:12 |
Capturar teclas en edit | sur-se | OOP | 10 | 16-07-2004 13:25:17 |
![]() |
|