anchor.diff:      Property Style;
       Property TabOrder;
       Property TabStop;
  -    Property TabWidth;
  +    //Property TabWidth;
       Property Visible;
       Property OnClick;
       Property OnContextPopup;
  
positive.code:     Procedure RemeasureItems(Index: Integer);
      Procedure FontsChanged(Sender: TObject);
      Procedure RebuildSystemFonts(Rebuild: Boolean);
      Procedure CMFontChange(Var Message: TMessage); message CM_FONTCHANGE;
      Procedure CNDrawItem(Var Message: TWMDrawItem); message CN_DRAWITEM;
      Procedure CNMeasureItem(Var Message: TWMMeasureItem);
        message CN_MEASUREITEM;
      Procedure CMFontChanged(Var Message: TMessage); message CM_FONTCHANGED;
      Procedure WMEraseBkgnd(Var Message: TWMEraseBkgnd); message WM_ERASEBKGND;
      Procedure CMHintShow(Var Message: TMessage); message CM_HINTSHOW;
    protected
      Function DoMouseWheelDown(Shift: TShiftState; MousePos: TPoint): Boolean;
        override;
  
negative.code:     Procedure SetImages(Value: TPSCImageList);
      Procedure SetShowImages(Value: Boolean);
      Procedure SeTPSCSelectionShowing(Value: TPSCSelectionShowing);
      Procedure CNDrawItem(Var Message: TLMDrawItems); message CN_DRAWITEM;
    protected
      Procedure Notification(AComponent: TComponent;
        Operation: TOperation); override;
      //Procedure CreateParams(Var Params: TCreateParams); override;
      Function CreateObjects: TCollection; override;
      Function GetImageSize(Var Size: TSize): Boolean; virtual;
      Procedure DrawImage(Index: Integer; Const Rect: TRect); virtual;
  