anchor.diff:      ebsDefault:
           begin
             fpgStyle.DrawControlFrame(Canvas, r);
  -          InflateRect(r, -2, -2);
  +          rect := fpgStyle.GetControlFrameBorders;
  +          InflateRect(r, -rect.Left, -rect.Top);  { assuming borders are even on opposite sides }
           end;
       ebsSingle:
           begin
  
positive.code:   rTop: integer;
    firstcol, lastcol, firstrow, lastrow : integer;
    cWidths: array of integer;
  begin
    Canvas.ClearClipRect;
  
  
negative.code: {
      fpGUI  -  Free Pascal GUI Toolkit
  
      Copyright (C) 2006 - 2013 See the file AUTHORS.txt, included in this
      distribution, for details of the copyright.
  
      See the file COPYING.modifiedLGPL, included in this distribution,
  