Ver Mensaje Individual
  #12  
Antiguo 31-01-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola darkcuevas.

Si copias/pegas el código que te puse y los eventos correspondientes están asignados, te aseguro que funciona.
Para visualizar el funcionamiento, usá un Edit cuyo Tab Order sea el primero.

Te explico básicamente como funcióna el código.

Cuando se crea el form, se pone la propiedad KeyPreview a verdadero haciendo que el form capture los eventos de teclado
antes que el control activo. Se desactiva el TTimer y se ajusta el intervalo con que se disparará el evento OnTimer.

Al dispararse el evento OnTimer, mediante la función keybd_event se simula la presión de una tecla. ( A en el ejemplo).

Usé el evento OnKeyDown del form para verificar si la combinación Ctrl+A fué pulsada; si es así se activa o desactiva
el TTimer mediante la negación del estado anterior de la propiedad Enabled.

Un saludo.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 31-01-2011 a las 18:37:46.
Responder Con Cita