diff --git a/src/ce_dubproject.pas b/src/ce_dubproject.pas
index 968757da..7f6510e5 100644
--- a/src/ce_dubproject.pas
+++ b/src/ce_dubproject.pas
@@ -128,6 +128,7 @@ end;
 
 destructor TCEDubProject.destroy;
 begin
+  killProcess(fDubProc);
   subjProjClosing(fProjectSubject, self);
   fProjectSubject.free;
   //
diff --git a/src/ce_nativeproject.pas b/src/ce_nativeproject.pas
index 7bede719..c68da5a0 100644
--- a/src/ce_nativeproject.pas
+++ b/src/ce_nativeproject.pas
@@ -159,9 +159,9 @@ end;
 
 destructor TCENativeProject.destroy;
 begin
+  killProcess(fCompilProc);
   subjProjClosing(fProjectSubject, self);
   fProjectSubject.Free;
-  fCompilProc.Free;
   //
   fOnChange := nil;
   fLibAliases.Free;