anchor.diff:      {$IFDEF RELEASE}
       dmdProc.ShowWindow := swoHIDE;
       {$ENDIF}
  -    dmdproc.Options := [poStdErrToOutput, poUsePipes];
  +    dmdproc.Options := [poNewConsole, poStdErrToOutput, poUsePipes];
   
       dmdproc.Executable := 'dmd';
       aProject.getOpts(dmdproc.Parameters);
  
positive.code:   fPrjCfWidg.Free;
    fStExpWidg.Free;
    fFindWidg.Free;
    fProject.Free;
    fProjMru.Free;
    fFileMru.Free;
    //
    inherited;
  end;
  
negative.code: var
    widg: TCEWidget;
  begin
    fProject := TCEProject.Create(nil);
    fProject.Name := 'CurrentProject';
    for widg in WidgetList do widg.projNew(fProject);
    fProject.onChange := @projChange;
  end;
  