anchor.diff:  
       tpBottom:
         begin
  -        p1 := Height - FMargin - Buttonheight;
  +        p1 := Height - FMargin - ButtonHeight;
           p2 := Height - FMargin;
         end;
   
  
positive.code:     FOnChange: TTabSheetChange;
      FRightButton: TfpgButton;         // bottom/right
      FLeftButton: TfpgButton;          // left/top
      FFirstTabButton: TfpgTabSheet;
      FSortPages: boolean;
      FStyle: TfpgTabStyle;
      FTabPosition: TfpgTabPosition;
  
negative.code:     tpTop:
        begin
          lTxtFlags += TextFlagsDflt;
          lp := 0;
          r2.SetRect(2, 2, 50, 21);
          while h <> nil do
  