diff --git a/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas b/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
index f28d704b1f..bf62036865 100644
--- a/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
+++ b/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
@@ -1417,11 +1417,10 @@ begin
       end;
 
 
-
       if defNoTypeInfo in EvalFlags then
-        Res := FPrettyPrinter.PrintValue(AResText, APasExpr.ResultValue, DispFormat, RepeatCnt)
+        Res := FPrettyPrinter.PrintValue(AResText, ResValue, DispFormat, RepeatCnt)
       else
-        Res := FPrettyPrinter.PrintValue(AResText, ATypeInfo, APasExpr.ResultValue, DispFormat, RepeatCnt);
+        Res := FPrettyPrinter.PrintValue(AResText, ATypeInfo, ResValue, DispFormat, RepeatCnt);
 
       // PCHAR/String
       if APasExpr.HasPCharIndexAccess then begin