anchor.diff:    end;
   
     DoUpdateTabWidths;
  +  DoUpdateTabRects;
   
     //paint bottom rect
     if not FTabBottom then
  
positive.code:   AInvert: Integer;
    TempCaption: atString;
  begin
    if FTabShowEntireColor and (ATabHilite<>clNone) then
      ATabBg:= ATabHilite;
  
  
negative.code: 
    //normal tab?
    for i:= 0 to TabCount-1 do
    begin
      R1:= GetTabRect(i);
      if R1.Left>Pnt.X then exit;
      if PtInRect(R1, Pnt) then
      begin
        Result:= i;
        Exit;
      end;
    end;
  
    //plus tab?
    if FTabShowPlus then
  