anchor.diff:  
   
     { Base class to handle TfpgCalendarCombo controls }
  -  TtiCalendarComboMediatorView = class(TtiBaseEditMediatorView)
  +  TtiCalendarComboMediatorView = class(TtiControlMediatorView)
     protected
       procedure   SetupGUIandObject; override;
  +    procedure   SetObjectUpdateMoment(const AValue: TtiObjectUpdateMoment); override;
     public
       constructor Create; override;
       function    View: TfpgCalendarCombo; reintroduce;
  
positive.code:       View.OnExit := @DoOnChange;
  end;
  
  constructor TtiSpinEditFloatMediatorView.Create;
  begin
    inherited Create;
  
negative.code:   end;
  end;
  
  procedure TtiCalendarComboMediatorView.SetObjectUpdateMoment(
    const AValue: TtiObjectUpdateMoment);
  begin
    inherited SetObjectUpdateMoment(AValue);
  