delphi - evento OnReturnPressed

[123delphi321]

ciao a tutti,

volevo gestire l'evento OnReturnPressed di un campo Tedit

tale evento l'ho trovato nell'help del componente Tedit, ma non lo trovo tra gli eventi dell'oggetto?????

io volevo fare in modo che quando alla pressione di "enter" sul campo tedi1 venisse generato l'evento click di un button che sta sulla stessa form:

qundi sull'evento onReturnPressed

begin

TForm1.Button1Click;
end;



grazie

[LeleFT]

Adesso non ricordo quali siano gli eventi di un componente Tedit, ma sicuramente c'è l'evento onKeyPressed (o similia). Puoi intercettare questo evento e controllare se il tasto premuto è Enter (codice ASCII 13).


Ciao.

[123delphi321]

grazie,.....ho fatto cosi:


procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=chr(13) then Form1.Button1.Click ;
end;

ciao

[alka]

Originariamente inviato da 123delphi321
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=chr(13) then Form1.Button1.Click ;
end;

E' meglio se "assorbi" il tasto...

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
  begin
    Button1.Click;
    Key := #0;
  end;
end;

Ciao!