From 078cf6077a490cf6d2761399871ab8bb769cf3f1 Mon Sep 17 00:00:00 2001
From: Martin <laz.git@mfriebe.de>
Date: Wed, 28 Feb 2024 22:23:33 +0100
Subject: [PATCH] LeakView: Fix resolve. Outdated use of ImageBase, which is
 now RelocationOffset

(cherry picked from commit 8ca43789be9d04baf9c699ca4421b7fce0a21234)
---
 components/leakview/leakinfo.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/leakview/leakinfo.pas b/components/leakview/leakinfo.pas
index 95a6c136cd..5d22f0978f 100644
--- a/components/leakview/leakinfo.pas
+++ b/components/leakview/leakinfo.pas
@@ -952,9 +952,9 @@ begin
             end
             {$ELSE}
             if j > 0 then
-              sym := DwarfInfo.FindProcSymbol(CurLine.Addr - 1 + ImageLoaderList.ImageBase)
+              sym := DwarfInfo.FindProcSymbol(CurLine.Addr - 1 + ImageLoaderList.RelocationOffset)
             else
-              sym := DwarfInfo.FindProcSymbol(CurLine.Addr + ImageLoaderList.ImageBase);
+              sym := DwarfInfo.FindProcSymbol(CurLine.Addr + ImageLoaderList.RelocationOffset);
             if (sym <> nil) and (sym.Line > 0) then begin
               CurLine.FileName := sym.FileName;
               CurLine.LineNum := sym.Line;