anchor.diff:      begin
         if MargArrayO[S] = bssNone then
         begin
  -        MargArrayO[S] := bssSolid;
  +        if Table.BorderColor = clNone then
  +          MargArrayO[S] := bssOutset
  +        else
  +          MargArrayO[S] := bssSolid;
           if (VarType(MargArrayO[W]) in varInt) and (MargArrayO[W] = IntNull) then
             MargArrayO[W] := Table.BorderWidth;
  -        //MargArrayO[BorderLeftWidth] := Table.BorderWidth;
         end;
         Inc(S);
       end;
  
positive.code:       if IB > ClientContentBot then
          ClientContentBot := IB;
      end;
      ContentBot := ClientContentBot + MargArray[PaddingBottom] +
        MargArray[BorderBottomWidth] + MargArray[MarginBottom];
      DrawBot := Max(ClientContentBot, MyCell.tcDrawBot) + MargArray[PaddingBottom]
        + MargArray[BorderBottomWidth];
  
      Result := ContentBot - Y;
  
  
negative.code: 
    X := X + Indent;
  
    XR := RefX + MargArray[MarginLeft] + MargArray[PaddingLeft] + MargArray[BorderLeftWidth] + NewWidth + MargArray[MarginRight] + MargArray[PaddingRight] + MargArray[BorderRightWidth]; {current right edge}
    if Positioning = posRelative then
      YB := ContentBot - YOffset + TopP
    else if FLoatLR in [ALeft, ARight] then
  