anchor.diff:    
     TfpgTabStyle    = (tsTabs, tsButtons, tsFlatButtons);
     TfpgTabPosition = (tpTop, tpBottom, tpLeft, tpRight, tpNone);
  +  TfpgTabOption   = (to_PMenuClose, to_PMenuShowAvailTabs);
  +
  +  TfpgTabOptions = set of TfpgTabOption;
   
   
     TfpgTabSheet = class(TfpgWidget)
  
positive.code:     FStyle: TfpgTabStyle;
      FTabPosition: TfpgTabPosition;
      FPopupMenu: TfpgPopupMenu;
      function    GetActivePageIndex: integer;
      function    GetPage(AIndex: integer): TfpgTabSheet;
      function    GetPageCount: Integer;
  
negative.code:   FWidth  := 150;
    FHeight := 100;
    FIsContainer := True;
    FTabOptions  := [];
  
    FTextColor        := Parent.TextColor;
    FBackgroundColor  := Parent.BackgroundColor;
  