ayuda con teclas
 

hola todos, les comento cual es mi problema. Estoy haciendo una aplicacion que tiene propiedades Tactiles, y necesito colocar unos speedbutton y al precionarlos sea como precionar una tecla del teclado y se asigne al edit que tenga ese momento el foco y no lo pierda ademas. creo que es por mensajes de windows pero no se bien como.

de ante mano les agradesco culaquier ayuda que me puedan dar.

y disculpen las molestias. :D :D

Funciones para simular tecleo
 

¡Buen día a todos!

Perico:

En la biblioteca Interfaz GH tengo una función llamada SimulTeclCade (Simular Tecleo de Cadena), que puedes utilizar de la siguiene manera:

El ejemplo anterior hará que se ingrese un "5" al edit que tenga el foco en ese momento, exactamente como si el usuario lo hubiese introducido con el teclado.

Espero esto sea de utilidad. Seguimos en contacto.

Al González :).

No entiendo muy bien tu pregunta. Un speedbutton de por sí no obtiene el foco así que no se perderá el foco del edit que en esos momentos lo tenga. En el evento OnClick del speedbutton puedes simplemente verificar que ActiveControl sea un TEdit y asignarle el texto que quieras:

Código Delphi [-]
if ActiveControl is TEdit then
  TEdit(ActiveControl).Text := 'tu texto';

// Saludos

gracias
 

y como descargo esa biblioteca

gracias por su ayuda.


roman, lo que pasa es que los speedbutton estan es en otro formulario y el si toma el foco de todos modos gracias y si tienes alguna otra sugerencia estaria muy agradecido.

¡Buen día a todos!

Hola Perico:

Este es un enlace para su descarga:

Interfaz GH

Espero les sea de utilidad. Seguimos en contacto.

Al González :).

Vamos a suponer que los speed button están en Form1 y los TEdit en Form2.

En Form1 interceptas el mensaje WM_MOUSEACTIVATE:

Código Delphi [-]
type
  TForm1 = class(TForm)
  private
    procedure WMMouseActivate(Msg: TWMMouseActivate); message; WM_MOUSEACTIVATE;
  end;

implementation

procedure TForm1.WMMouseActivate;
begin
  Msg.Result := MA_NOACTIVATE;
end;

Con esto puedes presionar los speed button sin que Form2 pierda el foco.

// Saludos

ok gracias, no pude descargar la biblioteca desde ahi si puedes enviarmela a mi correo perico@cantv.net y algun manual te lo agradeceria y disculpa las molestias.

gracias roman hare eso para lo del foco, es muy buena la solucion.