diff --git a/Source/Debugger.pas b/Source/Debugger.pas
index 083c915..7792edb 100644
--- a/Source/Debugger.pas
+++ b/Source/Debugger.pas
@@ -667,9 +667,17 @@ procedure TDebugger.AddBreakPoints(
                 ' moduleName: ' + ModuleName +
                 ' unitModuleName: ' + UnitModuleName +
                 ' addr:' + IntToStr(LineIndex) +
+                {$IF CompilerVersion > 31}
                 ' VA:' + IntToHex(MapLineNumber.VA) +
+                {$ELSE}
+                ' VA:' + IntToHex(MapLineNumber.VA, SizeOf(DWORD)*2) +
+                {$ENDIF}
                 ' Base:' + IntToStr(AModule.Base) +
+                {$IF CompilerVersion > 31}
                 ' Address: ' + IntToHex(Integer(AddressFromVA(MapLineNumber.VA, AModule.Base)))
+                {$ELSE}
+                ' Address: ' + IntToHex(Integer(AddressFromVA(MapLineNumber.VA, AModule.Base)), SizeOf(DWORD)*2)
+                {$ENDIF}
                 );
 
               BreakPoint := FBreakPointList.BreakPointByAddress[(AddressFromVA(MapLineNumber.VA, AModule.Base))];