编辑：请参阅WM_SETFOCUS上的文档

编辑2：

此外,您可以在创建自定义表单时使用以下内容：

procedure TMainForm.CreateParams(var Params: TCreateParams) ;
 //const WS_EX_NOACTIVATE = $8000000;
 begin
   inherited;
   Params.ExStyle := Params.ExStyle + WS_EX_NOACTIVATE;
 end;

防止表单激活(从其他表单获取焦点).就像我在评论中提到的那样,你可能应该使用非窗口控制键.