mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-18 00:39:43 +02:00
LCL: added capfHasScrollOffset into ControlAtPos in WMContextMenu so offset is ok when control is inside scrolled control. issue #23584
git-svn-id: trunk@39922 -
This commit is contained in:
parent
835664f7f6
commit
0d3fac65e3
@ -8136,7 +8136,7 @@ begin
|
||||
begin
|
||||
// don't allow disabled and don't search wincontrols - they receive their
|
||||
// message themself
|
||||
Child := ControlAtPos(ScreenToClient(SmallPointToPoint(Message.Pos)), []);
|
||||
Child := ControlAtPos(ScreenToClient(SmallPointToPoint(Message.Pos)), [capfHasScrollOffset]);
|
||||
if Assigned(Child) then
|
||||
with Message do
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user