Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   emular enter de un buttom en un tedit (https://www.clubdelphi.com/foros/showthread.php?t=75833)

Rofocale 22-09-2011 04:35:39

emular enter de un buttom en un tedit
 
Hola a todos quisiera sabe como puedo hacer para emular el apretar enter en un boton si escribo en un edit por ejemplo hola y luego con el mouse tengo que apretar el boton para buscar determinado caracter.

lo que quiero hacer es que al escribir hola en el TEdit al apretar enter me emule dicho enter del boton y me aparesca los resultados

gracias

Crandel 22-09-2011 05:42:41

Puedes utilizar el evento KeyPress del componente TEdit.
dentro del evento escribes algo asi:

Código Delphi [-]
if Key = #13 then
    Button1Click(Sender);

.

Rofocale 22-09-2011 06:27:00

gracias funciona

olbeup 22-09-2011 07:58:51

También vale:
Código Delphi [-]
if Key = #13 then
  Button1.Click;

ecfisa 22-09-2011 17:44:51

Hola.

Otra opción más:
Código Delphi [-]
  if Key = #13 then
  begin
    PostMessage(Button1.Handle, WM_LBUTTONDOWN, MK_LBUTTON,0);
    PostMessage(Button1.Handle, WM_LBUTTONUP, MK_LBUTTON,0);
  end;

Saludos.


La franja horaria es GMT +2. Ahora son las 00:31:19.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi