diff --git a/lcl/interfaces/win32/win32callback.inc b/lcl/interfaces/win32/win32callback.inc index d030027d82..68ca46d1df 100644 --- a/lcl/interfaces/win32/win32callback.inc +++ b/lcl/interfaces/win32/win32callback.inc @@ -2621,7 +2621,7 @@ begin if (Owner is TCustomForm) or (Owner is TCustomFrame) then begin // ask form about control under mouse. we need TWinControl - Control := Owner.ControlAtPos(P, [capfAllowWinControls]); + Control := Owner.ControlAtPos(P, [capfAllowWinControls, capfRecursive]); if (Control <> nil) and not (Control is TWinControl) then Control := Control.Parent; end