简单操做问题

Question

我想请问下:在FORM上面
有个EDIT,有个BUTTON
我想实现在EDIT上输入完内容后,按下键盘的回车键,就相当于按下了BUTTON键.
请问怎么实现,请指点.

Answer 1

OnKeyDown事件里写
if key=13 then
begin 
  BUTTON中代码  
end

Answer 2

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if key=#13 then
    button1.OnClick(self);
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  showmessage('ok');
end;

Answer 3

up 楼上的。。
button1.OnClick(self); 

Answer 4

Button1Click(nil)
这样也可以

Answer 5

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