Prozedur aufrufen - Onclick - Edit

[uligerhardt]

Zitat von DeddyH:

Delphi-Quellcode:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
   if key = vk_return then 
     Button1Click(Button1);
end;

Oder  Button1.Click;