anchor.diff:  {$I psc_defines.inc}
   
   Uses
  -  Windows,
  -  messages,
  +  LCLType,
  +  Lmessages,
     forms,
     controls,
     classes,
  
positive.code:       write SetPanelKind default cpkDateTime;
      Property IntegralSize: Boolean read FIntegralSize write SetIntegralSize
        default cPSCDefIntegralSize;
      Property BevelOuter default cPSCDefBevelOuter;
      Property OnDaySelected: TPSCDaySelectedEvent read FOnDaySelected write
        FOnDaySelected;
      Property ShowDateEdit: boolean read FShowDateEdit write SetShowDateEdit
  
negative.code: Constructor TPSCCustomCalendarPanel.Create(AOwner: TComponent);
  Begin
    Inherited Create(AOwner);
    ControlStyle := ControlStyle -
      [csCaptureMouse,csClickEvents,csDoubleClicks,csSetCaption];
    FullRepaint := False;
    FShowDateEdit := cPSCDefShowDateEdit;
    //BevelOuter := cPSCDefBevelOuter;
    FIntegralSize := cPSCDefIntegralSize;
    FCalendar := CreateCalendar;
    FDateEdit := TPSCDateTimeUpDown.Create(Self);
  