Ver Mensaje Individual
  #7  
Antiguo 17-10-2011
Avatar de Sapt_86
Sapt_86 Sapt_86 is offline
Registrado
NULL
 
Registrado: oct 2011
Ubicación: Bahia Blanca, Argentina
Posts: 8
Reputación: 0
Sapt_86 Va por buen camino
Hola L3st4t.

Creo entender lo que intentas hacer, si lo que quieres es que al presionar la tecla enter en el edit se ejecute el procedimiento que esta asociado al evento OnClick del boton, debes hacer lo siguiente, en el evento OnKeyUp del edit:

Código Delphi [-]
procedure TForm1.edt1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key= vk_return) then
    btn1.Click;
end;

o

Código Delphi [-]
procedure TForm1.edt1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key= vk_return) then
    btn1.OnClick(Sender);
end;

Ambos deberian funcionar. El evento OnEnter de algunos objetos no hace referencia a que se ejecuta cuando presionas la tecla enter.

Espero haberte ayudado, de lo contrario dime que error te muestra.

Saludos.
Responder Con Cita