anchor.diff:        BorderStyle:=bsSingle;
         TabStop := True;
         MultiSelect := False;
  -      BorderEdges := [];
  +      //BorderEdges := [];
         OnMouseUp := Self.CalendarMouseUp;
         OnDateChanged := Self.DateChanged;
         If Not (csDesigning In ComponentState) Then
  
positive.code: {$I psc_defines.inc}
  
  Uses
    Windows,
    messages,
    forms,
    controls,
    classes,
  
negative.code: 
  {------------------------------------------------------------------------------}
  
  Procedure TPSCCustomCalendarPanel.CMFontChanged(Var Message: TLMessage);
  Begin
    Inherited;
    UpdatePanel;
  