anchor.diff:  var
     Ed: TATSynEdit;
     Caret: TATCaretItem;
  -  NLine: integer;
   begin
     if FCodetreeDblClicking then exit;
     FCodetreeNeedsSelJump:= true;
  
positive.code: 
    FLastDirOfOpenDlg:= '';
    FLastLexerForPluginsMenu:= '-';
  
    UpdateMenuItemHint(mnuFile, 'top-file');
    UpdateMenuItemHint(mnuEdit, 'top-edit');
  
negative.code:   S:= Trim(S);
    if S<>'' then
    begin
      FLastTooltipLine:= Ed.Carets[0].PosY;
      DoTooltipShow(S, UiOps.AltTooltipTime, atpCaret, true);
    end;
  end;
  