Ver Mensaje Individual
  #9  
Antiguo 22-01-2018
breadagast breadagast is offline
Miembro
 
Registrado: nov 2006
Posts: 10
Reputación: 0
breadagast Va por buen camino
No consigo capturar las teclas de Función

Hola, me contesto a mi mismo por si a alguien le viene bien.

Para capturar las teclas de función sólo hay que poner el siguiente código:

Código:
 if not AltDWN then
    KeyState1[VK_RMENU] := 0;

if (VirtualKey in [112 .. 123]) then
    begin
      SendMessage(pFHandle^, KeyMsg, VirtualKey, KeyStroke);
    end
    else
    begin
      Count := ToAscii(VirtualKey, KeyStroke, KeyState1, @AryChar[1], 0);
      ToAscii(VirtualKey, KeyStroke, KeyState1, @AryChar[1], 0);    
      ...
Responder Con Cita