Ver Mensaje Individual
  #2  
Antiguo 05-04-2007
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.288
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
La API GetKeyboardState te devuelve el estado de las 256 teclas. A partir de ahí se trata de preguntar cómo está cada una de ellas (o las que a tí te interese conocer).

Por ejempo:

Código Delphi [-]
var
   KeybState: TKeyboardState;
begin
  // obtener el estado
  GetKeyboardState(Teclado);
  // Preguntar...
  if ((KeybState[VK_CONTROL] and 128)=128) and
     ((KeybState[VK_F5]      and 128)=128) and
     ((KeybState[Ord('F')]   and 128)=128) then begin
      ShowMessage('Se ha pulsado CTRL+F5+F');
  end;
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita