From 60286eb1519e5aed664d08b3381caafab77d5426 Mon Sep 17 00:00:00 2001
From: wp_xyz <wp_xxyyzzz@gmx.net>
Date: Thu, 26 Dec 2024 10:54:46 +0100
Subject: [PATCH] LazReport: Fix mouse cursor disappearing over images. Issue
 #41289, patch by paweld

(cherry picked from commit ad55ba8399da0e80695eddc2896afc3d5475f8ee)
---
 components/lazreport/source/lr_view.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/components/lazreport/source/lr_view.pas b/components/lazreport/source/lr_view.pas
index 6034b4b522..2bfde87ea5 100644
--- a/components/lazreport/source/lr_view.pas
+++ b/components/lazreport/source/lr_view.pas
@@ -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