cambiar las función de las teclas del volumen del movil

[farute]

he encontrado que se hace con esto:
vkHardwareBack
vkVolumeDown
vkVolumeUp

Código Delphi [-]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; var KeyChar: Char;
  Shift: TShiftState);
 begin
    case Key of
    vkVolumeUp:
     begin
        //lo que quiero ejecutat
      end;
   end;
 end;

El problema es que con el teléfono apagado no funciona. y que detecte doble pulsación ya.....
una pulsación larga también me podría servir.

[Ñuño Martínez]

Como no guardes el momento en el que se hace la pulsación para consultarla y ver si la anterior se hizo en menos de x tiempo...