diff --git a/lcl/interfaces/qt/qtcaret.pas b/lcl/interfaces/qt/qtcaret.pas
index e9714912e8..83234e4cdb 100644
--- a/lcl/interfaces/qt/qtcaret.pas
+++ b/lcl/interfaces/qt/qtcaret.pas
@@ -427,7 +427,8 @@ begin
   ' Y=',Value.Y,' OldX=',FPos.X,' OldY=',FPos.Y,' Dirty=',FCaretDirty);
   {$ENDIF}
 
-  if not QtWidgetSet.IsValidHandle(HWND(FWidget)) or (FWidget.Widget = nil) then
+  if not QtWidgetSet.IsValidHandle(HWND(FWidget)) or (FWidget.Widget = nil)
+  or (FWidget.Context=0) then
   begin
     // oops, our caret is dirty here.
     FCaretDirtyPos := FPos;