anchor.diff:      FPages: TList;
       FActivePageIndex: integer;
       FOnChange: TTabSheetChange;
  -    FRightButton: TfpgButton;
  -    FLeftButton: TfpgButton;
  +    FRightButton: TfpgButton;         // bottom/right
  +    FLeftButton: TfpgButton;          // left/top
       FFirstTabButton: TfpgTabSheet;
       FSortPages: boolean;
       FStyle: TfpgTabStyle;
  
positive.code:   TfpgPageControl = class;
    
    TfpgTabStyle    = (tsTabs, tsButtons, tsFlatButtons);
    TfpgTabPosition = (tpTop, tpBottom, tpNone{, tpLeft, tpRight});
  
  
    TfpgTabSheet = class(TfpgWidget)
  
negative.code:             FFirstTabButton := h
            else
              h := FFirstTabButton;
            FLeftButton.SetPosition(Width - (FRightButton.Width * 2), Height - ButtonHeight-FMargin, FRightButton.Height, FRightButton.Height);
            FRightButton.SetPosition(Width - FrightButton.Width, Height - ButtonHeight-FMargin, FRightButton.Height, FRightButton.Height);
            FLeftButton.Visible   := True;
            FRightButton.Visible  := True;
          end
  