anchor.diff:      procedure   HandlePaint; override;
     public
       constructor Create(AOwner: TComponent); override;
  -    property    Alignment;
       property    OldColor;
       property    Text;
     published
  
positive.code:     procedure   HandlePaint; override;
    public
      constructor Create(AOwner: TComponent); override;
      property    Alignment;
      property    OldColor;
      property    Text;
    published
  
negative.code:     procedure   HandlePaint; override;
    public
      constructor Create(AOwner: TComponent); override;
      property    OldColor;
      property    Text;
    published
  