anchor.diff:      Sleep(1000);
     end;
   
  -  Files := GetAllFilesFromProjectGroup;
     Paths := nil;
   
     FProjectUnits := TUnitsController.Create;
  -  FProjectPathWorker := TParserWorker.Create(Paths, Files, OldFiles);
  +  FProjectPathWorker := TParserWorker.Create(Paths, NewFiles, OldFiles);
     FProjectPathWorker.Start(OnFinishedProjectPathScan);
   end;
   
  
positive.code:     Logger.Debug('TEnvironmentController.LoadProjectPath: no');
      Exit;
    end;
  
    Logger.Debug('TEnvironmentController.LoadProjectPath: yes');
  
  
negative.code:     FreeAndNil(FProjectUnits);
    end;
  
    Files := GetAllFilesFromProjectGroup;
  
    LocalThread := TThread.CreateAnonymousThread(
      procedure
      begin
        CreateProjectPathUnits(Files, OldFiles);
      end
      );
    LocalThread.FreeOnTerminate := True;
  