diff --git a/packages/fcl-base/src/daemonapp.pp b/packages/fcl-base/src/daemonapp.pp
index 363f355b0a..a333da6451 100644
--- a/packages/fcl-base/src/daemonapp.pp
+++ b/packages/fcl-base/src/daemonapp.pp
@@ -1143,7 +1143,10 @@ begin
       end;
     end
   else
+    begin
     FDaemon.Status:=csStopped;
+    Application.Terminate;
+    end;
 end;