anchor.diff:    R.Left:= FTabIndentInit+FTabAngle;
     R.Right:= R.Left;
     R.Top:= FTabIndentTop;
  -  R.Bottom:= R.Top+DoScale(FTabHeight);
  +  R.Bottom:= R.Top+FTabHeight;
   
     for i:= 0 to TabCount-1 do
     begin
  -    R.Left:= R.Right + DoScale(FTabIndentInter);
  -    R.Right:= R.Left + DoScale(FTabWidth);
  +    R.Left:= R.Right + FTabIndentInter;
  +    R.Right:= R.Left + FTabWidth;
       Data:= GetTabData(i);
       if Assigned(Data) then
         Data.TabRect:= R;
  
positive.code: 
    Width:= 400;
    Height:= 35;
    FScalePercents:= 100;
  
    FMouseDown:= false;
    FMouseDownPnt:= Point(0, 0);
  
negative.code:   (Source as TATTabs).DoTabDropToOtherControl(Self, Point(X, Y));
  end;
  
  end.
  
  