anchor.diff:      procedure HintTimerEvent(sender: TObject);
       procedure InitHintWins;
     protected
  +    procedure MouseLeave; override;
       procedure SetVisible(Value: Boolean); override;
       procedure SetHighlighter(const Value: TSynCustomHighlighter); override;
       procedure UTF8KeyPress(var Key: TUTF8Char); override;
  
positive.code: procedure TCESynMemo.SetVisible(Value: Boolean);
  begin
    inherited;
    if Value then setFocus;
  end;
  
  procedure TCESynMemo.InitHintWins;
  
negative.code:   result += fMousePos.x;
  end;
  
  procedure TCESynMemo.MouseLeave;
  begin
    fDDocWin.Hide;
    fCallTipWin.Hide;
  end;
  
  procedure TCESynMemo.MouseMove(Shift: TShiftState; X, Y: Integer);
  var
    dX, dY: Integer;
  