anchor.diff:      end;
   
     //left triangle
  -  PL1:= Point(ARect.Left+FTabAngle*AInvert, ARect.Top);
  -  PL2:= Point(ARect.Left-FTabAngle*AInvert, ARect.Bottom-1);
  -  if FTabAngle>0 then
  +  PL1:= Point(ARect.Left+NAngle*AInvert, ARect.Top);
  +  PL2:= Point(ARect.Left-NAngle*AInvert, ARect.Bottom-1);
  +  if NAngle>0 then
     begin
       //DrawTriangleRaw(C, PL1, PL2, Point(PL1.X, PL2.Y), ATabBg);
       //draw little shifted line- bottom-left point x+=1
  
positive.code:     FTabNumPrefix: atString;
      FTabBottom: boolean; 
      FTabAngle: Integer; //angle of tab border: from 0 (vertcal border) to any size
      FTabHeight: Integer;
      FTabWidthMin: Integer; //tab minimal width (used when lot of tabs)
      FTabWidthMax: Integer; //tab maximal width (used when only few tabs)
  
negative.code: 
    if FTabAngle=AValue then Exit;
    FTabAngle:= AValue;
    Invalidate;
  end;
  
  procedure TATTabs.SetTabAngleMaxTabs(AValue: Integer);
  begin
    if FTabAngleMaxTabs=AValue then Exit;
    FTabAngleMaxTabs:= AValue;
    Invalidate;
  end;
  
  
  