delphi中如何设置窗口默认的按钮

我想要设置一个窗口的默认按钮，比如是“确定”按钮，我只需敲回车键就可以执行，请问怎么实现

在窗bai口上建立一个按du钮，如button1
设置zhi窗dao口的属性zhuanActiveControl为button1
在button1的OnKeyDown事件中shu：
if key=#13 then
button1.Click;