diff --git a/components/lazdebuggers/lazdebugtestbase/testdbgcompilerprocess.pas b/components/lazdebuggers/lazdebugtestbase/testdbgcompilerprocess.pas
index d048d37517..ec1270c463 100644
--- a/components/lazdebuggers/lazdebugtestbase/testdbgcompilerprocess.pas
+++ b/components/lazdebuggers/lazdebugtestbase/testdbgcompilerprocess.pas
@@ -139,7 +139,7 @@ begin
   Result := '';
   i := IndexOfExe(AnExeName);
   if i >= 0 then
-    Result := Items[i].FExeName;
+    Result := Items[i].FComandline;
 end;
 
 { TCompilerProcess }