Während Focus auf Edit - Enter = Button1.Click

[s-off]

Hallo,

Delphi-Quellcode:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
   case Key of
      VK_RETURN: Button1.OnClick(Sender);
   end;
end;