Edit içine girilen veriden sonra Enter tuşu ile Butona komut vermek.
Kod Seç
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then begin
SelectNext(Sender as tWinControl, True, True );
if Sender = Edit10 then
Button1.Click; // let the button click itself
Key := #0;
end;
end;