anchor.diff:    end;
   end; { TDelphiLensUIWorker.SetConfig }
   
  +procedure TDelphiLensUIWorker.TimerRescan;
  +var
  +  msg: TOmniMessage;
  +begin
  +  msg := TOmniMessage.Create(0, TOmniValue.Null);
  +  Rescan(msg);
  +end; { TDelphiLensUIWorker.TimerRecan }
  +
   { TDLUINavigationInfo }
   
   constructor TDLUINavigationInfo.Create(const location: TDLUIXLocation);
  
positive.code: begin
    try
      FScanID.Increment;
      (msg.MsgData.AsInterface as IOmniWaitableValue).Signal(FScanID.Value);
      if not assigned(FDelphiLens) then
        Exit;
  
  
negative.code:         //TODO: Report error
    //      Console.Writeln('Activate: Project = nil')
    //      break; //repeat
        else if FCurrentResultID >= FCurrentRescanID then begin // may run ahead because of the timer
          context := CreateWorkerContext(FUIXStorage, FProjectName, FScanResult,
            TDLUIXLocation.Create(fileName, unitName, line, column),
            tabNames.Split([#13]), monitorNum);
          DLUIShowUI(context);
          break; //repeat
        end
        else
      finally
        FScanLock.Release;
      end;
    until false;
  
    navigate := assigned(context) and context.Target.HasValue;
  