anchor.diff:              cSmoothScale,
               ampnBottomLeft,
               AColorBg,
  -            AColorBorder);
  +            AColorBorder,
  +            FBitmapAngle);
             DrawTriangleRectFramed(C,
               ARect.Right-1,
               ARect.Top+IfThen(not ATabActive, 1),
  
positive.code:   FreeAndNil(FCaptionList);
    FreeAndNil(FTabList);
    FreeAndNil(FBitmapRound);
    FreeAndNil(FBitmap);
    inherited;
  end;
  
negative.code:     b.Canvas.LineTo(line2.X, line2.Y);
      b.Canvas.Pen.Width:= 1;
  
      CanvasStretchDraw(C, Rect(AX, AY, AX+ASizeX, AY+ASizeY), b);
  end;
  
  function _ShortenStringEx(C: TCanvas;
  