anchor.diff:    var
       FDelphiLens: IDelphiLens;
       FOwner     : TDelphiLensUIProject;
  +    FScanLock  : IOmniCriticalSection;
     strict protected
       procedure ScheduleRescan;
     protected
  -    function Initialize: boolean; override;
  +    function  Initialize: boolean; override;
     public
       procedure Open(const projectName: TOmniValue);
       procedure Close;
  
positive.code:     Exit;
  
    Task.ClearTimer(CTimerRescan);
    scanResult := FDelphiLens.Rescan;
  
    Task.Invoke(
      procedure
  
negative.code:   TDelphiLensUIProject = class
    strict private
      FNavigationInfo: TDLUINavigationInfo;
      FScanLock      : IOmniCriticalSection;
      FScanResult    : IDLScanResult;
      FUIXStorage    : IDLUIXStorage;
      FWorker        : IOmniTaskControl;
  