Tema: Problemas al Cachar cuando se presion Shift+Flecha Arriba/Abajo
Ver Mensaje Individual
  #1  
Antiguo 10-08-2006
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
  
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Reputación: 21
AGAG4 Va por buen camino
Problemas al Cachar cuando se presion Shift+Flecha Arriba/Abajo
Tengo en el evento OnkeyDown el siguiente código que tome de Trucomania para saber cuando se presionan AL MISMO TIEMPO la tecla Shif + Flecha Arriba ó Abajo pero no me funciona:
Código Delphi [-]
  if (HiWord(GetKeyState(VK_SHIFT)) <> 0 ) and ((key = 38) or (key = 40)) then
 ....
// y también....
  if (Key = VK_SHIFT) and (ssShift in Shift) then
   ....

Alguna Sugerencia....
Responder Con Cita