anchor.diff:      Property StartDate;
       Property Flat;
       Property BorderStyle;
  -    Property BorderEdges;
  +    //Property BorderEdges;
       Property MaxSelDates;
       Property WeekCursor;
       Property SelectKind;
  
positive.code: 
  {------------------------------------------------------------------------------}
  
  Procedure TPSCCustomCalendar.SetMaxDateLimit(Value: Boolean);
  Begin
    If FMaxDateLimit <> Value Then
      Begin
  
negative.code: 
  {------------------------------------------------------------------------------}
  
  function TPSCCustomCalendar.UpdateTopLeftCorner(const R: TRect): TRect;
  Var
    P:TPoint;
  begin
  