mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-06 00:58:04 +02:00
LazReport: Fix mouse cursor disappearing over images. Issue #41289, patch by paweld
(cherry picked from commit ad55ba8399
)
This commit is contained in:
parent
11b373446d
commit
0e1be81f90
@ -604,6 +604,7 @@ begin
|
||||
if not Assigned(Preview.EMFPages) then Exit;
|
||||
E:=TfrEMFPages(Preview.EMFPages);
|
||||
P:=Point(X - Preview.ofx, Y - Preview.ofy);
|
||||
C:=Cursor;
|
||||
for i := 0 to E.Count - 1 do
|
||||
if PtInRect(E[i]^.R, P) then
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user