没什么好解决办法,这样:放个ApplicationEvents1procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean);begin if (msg.message>wm_mousefirst) and (msg.message<WM_MOUSELAST) then begin if ischild(webbrowser1.Handle,msg.hwnd) then self.FocusControl(nil); end;end;