anchor.diff:    begin
       R:= GetTabRect(i);
       R.Left:= IfThen(i<=FTabIndex, R.Left, R.Right);
  -    R.Left:= R.Left - FOptDropMarkWidth div 2;
  -    R.Right:= R.Left + FOptDropMarkWidth;
  +    R.Left:= R.Left - FOptDropMarkSize div 2;
  +    R.Right:= R.Left + FOptDropMarkSize;
       C.Brush.Color:= FColorDropMark;
       C.FillRect(R);
     end;
  
positive.code:     FOptShowNumberPrefix: atString;
      FOptShowAtBottom: boolean;
      FOptTabAngle: integer; //angle of tab border: from 0 (vertcal border) to any size
      FOptAllowAngleForMaxTabs: integer; //maximal tab count, for which TabAngle is used (else used 0)
      FOptTabHeight: integer;
      FOptTabWidthMinimal: integer; //tab minimal width (used when lot of tabs)
      FOptTabWidthNormal: integer; //tab maximal width (used when only few tabs)
      FOptTabWidthMinimalHidesX: integer; //tab minimal width, after which "x" mark hides for inactive tabs
      FOptDropMarkWidth: integer;
      FOptSpaceBetweenTabs: integer; //space between nearest tabs (no need for angled tabs)
      FOptSpaceInitial: integer; //space between first tab and left control edge
      FOptSpaceBeforeText: integer; //space between text and tab left edge
  
negative.code: 
    FOptShowAtBottom:= false;
    FOptTabAngle:= 4;
    FOptUseAngleForMaxTabs:= 10;
    FOptTabHeight:= 24;
    FOptTabWidthMinimal:= 40;
    FOptTabWidthNormal:= 130;
    FOptTabWidthMinimalHidesX:= 55;
    FOptShowNumberPrefix:= '';
    FOptSpaceBeforeText:= 6;
    FOptDropMarkSize:= 6;
    FOptSpaceBetweenTabs:= 0;
    FOptSpaceInitial:= 30; //big for scroll arrows
    FOptSpaceOnTop:= 5;
  