diff --git a/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas b/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
index ad0559297a..6438129e9e 100644
--- a/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
+++ b/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
@@ -3565,9 +3565,9 @@ begin
   {$POP}
   LockRelease;
   try
-    SetState(dsStop);
     StopAllWorkers;
     FreeDebugThread;
+    SetState(dsStop); // after FreeDebugThread, which does ProcessMessages
   finally
     UnlockRelease;
   end;