Delphi - 将表单设置为在显示时不关注任何组件

Question

Delphi中是否有办法禁止表单专注于其任何组件但不禁用这些组件？我在表单的FormActivate事件上尝试了Self.SetFocus，但程序说它不能专注于禁用的组件。

Answer 1

使用以下OnActivate事件处理程序：

procedure TForm1.FormActivate(Sender: TObject);
begin
  ActiveControl:= nil;
end;