FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
TApplicationEvents
Que tal:
Alguien sabe como cachar un Shift + Tab en un TApplicationEvents ? Necesito cacharlo ahi, no necesito cacharlo en un ActionList, tampoco en un keyDown. Si alguien sabe le agradezco su ayuda.
__________________
La conquista mas grande de un hombre es la conquista de el mismo.
|
#2
|
|||
|
|||
TApplicationEvents
Gracias, ya lo resolví.
__________________
La conquista mas grande de un hombre es la conquista de el mismo.
|
#3
|
||||
|
||||
Pues si lo contases, quedaría ahi para alguien que en el futuro pueda necesitarlo.
|
#4
|
|||
|
|||
TApplicationEvent
Código:
//Esto lo hice en el evento OnMessage del TApplicatioEvent //No tengo el compilador a la mano asi que este codigo no lo extraje direc- //tamente del editor pero asi es como lo hice y me funcionó, //estoy en un ciber escribiendo como lo recuerdo. ... varShif:SmallInt;begin//Si el resultado que contiene Shift no es cero significa que está//PresionadaShif:=HiWord(GetKeyState(VK_SHIFT));if (Shit <> 0) and (Msg.Message = WM_KEYDOWN) and (Msg.lParam = 9) then begin // TabuladorShowmessage('Presionaste Shift-Tab');//Anulamos lo que presionamos para que no lo cache otro controlMsg.Message:=0;end; end;
__________________
La conquista mas grande de un hombre es la conquista de el mismo.
Última edición por calogero fecha: 06-02-2007 a las 07:49:48. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|