anchor.diff:    public
       constructor Create(AOwner: TComponent); override;
       destructor  Destroy; override;
  +    function    GetClientRect: TfpgRect; override;
       property    Font: TfpgFont read FFont;
     published
       property    AcceptDrops;
  
positive.code:   TPanelShape = (bsBox, bsFrame, bsTopLine, bsBottomLine, bsLeftLine,
      bsRightLine, bsSpacer, bsVerDivider);
  
    TPanelStyle = (bsLowered, bsRaised);
  
    TPanelBorder = (bsSingle, bsDouble);
  
  
negative.code:       Include(lTxtFlags, txtRight);
      taCenter:
        Include(lTxtFlags, txtHCenter);
    end;
  
    case FLayout of
      tlTop:
        Include(lTxtFlags, txtTop);
  