diff --git a/debugger/cmdlinedebugger.pp b/debugger/cmdlinedebugger.pp
index 20a69524e1..dff19404af 100644
--- a/debugger/cmdlinedebugger.pp
+++ b/debugger/cmdlinedebugger.pp
@@ -338,8 +338,12 @@ begin
   end;
   if not FDbgProcess.Running 
   then begin
-    FDbgProcess.Execute;
-    DebugLn('[TCmdLineDebugger] Debug PID: ', IntToStr(FDbgProcess.Handle));
+    try
+      FDbgProcess.Execute;
+      DebugLn('[TCmdLineDebugger] Debug PID: ', IntToStr(FDbgProcess.Handle));
+    except
+      on E: Exception do DebugLn('Exeption while executing debugger: ', E.Message);
+    end;
   end;
   Result := FDbgProcess.Running;
 end;