anchor.diff:      FSortPages: boolean;
       FStyle: TfpgTabStyle;
       FTabPosition: TfpgTabPosition;
  +    FPopupMenu: TfpgPopupMenu;
       function    GetActivePageIndex: integer;
       function    GetPage(AIndex: integer): TfpgTabSheet;
       function    GetPageCount: Integer;
  
positive.code:     FOnChange(self, ATabSheet);
  end;
  
  function TfpgPageControl.DrawTab(const rect: TfpgRect; const Selected: Boolean = False; const Mode: Integer = 1): TfpgRect;
  var
    r: TfpgRect;
  
negative.code: 
  
    TTabSheetChange = procedure(Sender: TObject; NewActiveSheet: TfpgTabSheet) of object;
    TTabSheetClosing = procedure(Sender: TObject; ATabSheet: TfpgTabSheet) of object;
    
    
    TfpgPageControl = class(TfpgWidget)
  