diff --git a/src/ce_dubproject.pas b/src/ce_dubproject.pas
index 7f6510e5..35cc521b 100644
--- a/src/ce_dubproject.pas
+++ b/src/ce_dubproject.pas
@@ -45,7 +45,7 @@ type
     procedure dubProcOutput(proc: TObject);
     procedure dubProcTerminated(proc: TObject);
     function getCurrentCustomConfig: TJSONObject;
-    function compileOrRun(run: boolean; const runArgs: string = ''): boolean;
+    procedure compileOrRun(run: boolean; const runArgs: string = '');
   public
     constructor create(aOwner: TComponent); override;
     destructor destroy; override;
@@ -79,7 +79,7 @@ type
     //
     procedure compile;
     function compiled: boolean;
-    function run(const runArgs: string = ''): boolean;
+    procedure run(const runArgs: string = '');
     function targetUpToDate: boolean;
     //
     property json: TJSONObject read fJSON;
@@ -390,7 +390,7 @@ begin
   SetCurrentDirUTF8(fPreCompilePath);
 end;
 
-function TCEDubProject.compileOrRun(run: boolean; const runArgs: string = ''): boolean;
+procedure TCEDubProject.compileOrRun(run: boolean; const runArgs: string = '');
 var
   olddir: string;
   prjname: string;
@@ -460,9 +460,9 @@ begin
   exit(fCompiled);
 end;
 
-function TCEDubProject.run(const runArgs: string = ''): boolean;
+procedure TCEDubProject.run(const runArgs: string = '');
 begin
-  result := compileOrRun(true);
+  compileOrRun(true);
 end;
 
 function TCEDubProject.targetUpToDate: boolean;
diff --git a/src/ce_inspectors.pas b/src/ce_inspectors.pas
index 3fd409eb..7438c73e 100644
--- a/src/ce_inspectors.pas
+++ b/src/ce_inspectors.pas
@@ -39,7 +39,6 @@ type
     procedure Edit; override;
   end;
 
-
   TListDrawValueProc = procedure(const CurValue: ansistring; Index: integer;
     ACanvas: TCanvas; const ARect:TRect; AState: TPropEditDrawState) of object;
 
@@ -86,7 +85,7 @@ var
   vOldPenColor, vOldBrushColor: TColor;
   vOldPenStyle: TPenStyle;
   noFill: Boolean;
-  proc: TListDrawValueProc;
+  //proc: TListDrawValueProc;
   Style : TTextStyle;
   OldColor : TColor;
   rc: TRect;
@@ -173,8 +172,6 @@ begin
   end;
 
   ACanvas.TextRect(rc, rc.Left+2, rc.Top, CurValue, Style);
-
-
 end;
 
 function TCECustomPathEditor.GetAttributes: TPropertyAttributes;
diff --git a/src/ce_interfaces.pas b/src/ce_interfaces.pas
index eeb6b36f..fbf4a79a 100644
--- a/src/ce_interfaces.pas
+++ b/src/ce_interfaces.pas
@@ -80,8 +80,8 @@ type
       procedure compile;
       // indicates wether last complation was successful.
       function compiled: boolean;
-      // tries to un the project output and returns true if it did
-      function run(const runArgs: string = ''): boolean;
+      // tries to execute the project output.
+      procedure run(const runArgs: string = '');
       // returns true if the target has not to be recompiled
       function targetUpToDate: boolean;
 
diff --git a/src/ce_main.pas b/src/ce_main.pas
index d01cfbec..7e3089f9 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -12,7 +12,7 @@ uses
   ce_widget, ce_messages, ce_interfaces, ce_editor, ce_projinspect, ce_projconf,
   ce_search, ce_miniexplorer, ce_libman, ce_libmaneditor, ce_todolist, ce_observer,
   ce_toolseditor, ce_procinput, ce_optionseditor, ce_symlist, ce_mru, ce_processes,
-  ce_infos, ce_dubproject, ce_dialogs, ce_dubprojeditor, ce_gdb, ce_dfmt, ce_lcldragdrop;
+  ce_infos, ce_dubproject, ce_dialogs, ce_dubprojeditor, {ce_gdb,} ce_dfmt, ce_lcldragdrop;
 
 type
 
diff --git a/src/ce_nativeproject.pas b/src/ce_nativeproject.pas
index c68da5a0..5ecdc31b 100644
--- a/src/ce_nativeproject.pas
+++ b/src/ce_nativeproject.pas
@@ -106,7 +106,7 @@ type
     function importsPathCount: integer;
     function importPath(index: integer): string;
     //
-    function run(const runArgs: string = ''): Boolean;
+    procedure run(const runArgs: string = '');
     function compiled: Boolean;
     procedure compile;
     function targetUpToDate: boolean;
@@ -778,13 +778,12 @@ begin
   fCompilProc.Execute;
 end;
 
-function TCENativeProject.run(const runArgs: string = ''): Boolean;
+procedure TCENativeProject.run(const runArgs: string = '');
 var
   prm: string;
   i: Integer;
   cwd: string;
 begin
-  result := false;
   killProcess(fRunner);
   if fRunnerOldCwd.dirExists then
     ChDir(fRunnerOldCwd);
@@ -824,8 +823,6 @@ begin
     getprocInputHandler.addProcess(fRunner);
   end;
   fRunner.Execute;
-  //
-  result := true;
 end;
 
 procedure TCENativeProject.runProcOutput(sender: TObject);