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:     property Top: Integer read GetTop write SetTop;
      property Width: Integer read GetWidth write SetWidth;
      property Height: Integer read GetHeight write SetHeight;
      property Anchors: TAnchors read fAnchors write SetAnchors;
      property Enabled: Boolean read fEnabled write SetEnabled;
      property Visible: Boolean read GetVisible write SetVisible;
      procedure Enable;
  