Foros Club Delphi - Simular pulsacion de tecla

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Simular pulsacion de tecla (https://www.clubdelphi.com/foros/showthread.php?t=4788)

acrophet

28-10-2003 19:19:47

Simular pulsacion de tecla

Hola, me gustaria saber si hay alguna funcion con la que podamos simular una pulsacion de una tecla (que se la pasemos como parametro).
En pocas palabras, quiero poder simular mediante codigo que se ha pulsado una determinada tecla (el tab en este caso).

roman

28-10-2003 19:35:41

Prueba con:

Código:

var

  Input: TInput;



begin

  Input.Itype := INPUT_KEYBOARD;

  Input.ki.wVk := VK_TAB; // Tecla a simular



  // Presionar tecla

  SendInput(1, Input, SizeOf(Input));



  // Soltar tecla

  Input.ki.dwFlags := KEYEVENTF_KEYUP;

  SendInput(1, Input, SizeOf(Input));

Ahora que si lo que buscas es cómo pasar el foco de un control a otro quizá te interese más el método SelectNext del formulario.

// Saludos

La franja horaria es GMT +2. Ahora son las 15:22:24.