anchor.diff:  
   {-------------------------------------}
   
  -Procedure TPSCCustomColorBox.CMFontChanged(Var Message: TMessage);
  +Procedure TPSCCustomColorBox.CMFontChanged(Var Message: TLMessage);
   Begin
     Inherited;
     AdjustSize;
  
positive.code: 
  {-------------------------------------}
  
  Procedure TPSCCustomColorBox.WMNCHitTest(Var Message: TWMNCHitTest);
  Var
    Rect: TRect;
  Begin
  
negative.code:   TPSCCustomSectionControl = Class(TControl,IPSCInterface,IPSCValidator)
    private
      FCanvas: TPSCCanvas;
      Procedure WMPaint(Var Message: TLMPaint); message LM_PAINT;
      Procedure IPSCValidator.InvalidateRect = InvalidateRegion;
      Procedure IPSCValidator.Invalidate = InvalidateControl;
      Procedure InvalidateRegion(Rect: TRect; Erase: Boolean);
  