diff --git a/components/synedit/syneditpointclasses.pas b/components/synedit/syneditpointclasses.pas
index 5a5c616ea8..ccaa3d3050 100644
--- a/components/synedit/syneditpointclasses.pas
+++ b/components/synedit/syneditpointclasses.pas
@@ -31,7 +31,7 @@ unit SynEditPointClasses;
 
 {$I synedit.inc}
 
-{off $DEFINE SynCaretDebug}
+{$DEFINE SynCaretDebug}
 
 interface
 
diff --git a/lcl/interfaces/qt/qtcaret.pas b/lcl/interfaces/qt/qtcaret.pas
index 83234e4cdb..fc72a0cc74 100644
--- a/lcl/interfaces/qt/qtcaret.pas
+++ b/lcl/interfaces/qt/qtcaret.pas
@@ -28,7 +28,7 @@ unit QtCaret;
 
 interface
 
-{off $DEFINE VerboseQtCaret}
+{$DEFINE VerboseQtCaret}
 
 {$I qtdefines.inc}
 
@@ -427,8 +427,7 @@ begin
   ' Y=',Value.Y,' OldX=',FPos.X,' OldY=',FPos.Y,' Dirty=',FCaretDirty);
   {$ENDIF}
 
-  if not QtWidgetSet.IsValidHandle(HWND(FWidget)) or (FWidget.Widget = nil)
-  or (FWidget.Context=0) then
+  if not QtWidgetSet.IsValidHandle(HWND(FWidget)) or (FWidget.Widget = nil) then
   begin
     // oops, our caret is dirty here.
     FCaretDirtyPos := FPos;