anchor.diff:      procedure SetWidth(aValue: Integer); virtual;
       procedure SetVisible(aValue: Boolean); virtual;
       procedure SetEnabled(aValue: Boolean); virtual;
  +    procedure SetAnchors(aValue: TAnchors); virtual;
     public
       Hitable: Boolean; //Can this control be hit with the cursor?
       Focusable: Boolean; //Can this control have focus (e.g. TKMEdit sets this true)
  
positive.code:   inherited;
    fScrollBar.Left := Left + Width - fScrollBar.Width;
    ReformatText; //Repositions the scroll bar as well
  end;
  
  
  
negative.code:   protected
      procedure SetHeight(aValue: Integer); override;
      procedure SetWidth(aValue: Integer); override;
      procedure SetAnchors(aValue: TAnchors); override;
      procedure SetVisible(aValue: Boolean); override;
      procedure SetEnabled(aValue: Boolean); override;
    public
  