Delphi 如何设置BUTTON运行后为默认焦点【有虚线框，按空白键可执行OnClick事件的】

Question

Delphi如何设置BUTTON运行后为默认焦点【有虚线框，按空白键可执行OnClick事件的】。
不是回车键，就是当窗体运行后，某一按钮要设置为焦点，然后在鼠标什么都没按的情况下，按下键盘的空白键，就会执行这按钮的单击事件。谢谢

Answer 1

FormShow事件中添加下列代码
Self.SetFocusedControl(btnok);

Form的KeyPreview设置为True
Form的OnKeyUp事件添加下列代码
if Key = VK_SPACE then
begin
btnOK.Click;
end;