修复单元格合并，边框显示不正确问题

range/Advanced/TSPdfTableRange.tsf

@@ -76,6 +76,11 @@ begin
         cell_range.StartY := tc_y;
         cell_range.Width := grid_cols[i].W;
         cell_range.FixedHeight := tc_h;
+        if i = length(tcs)-1 and i <> length(grid_cols)-1 then
+        begin
+            for j:=i+1 to length(grid_cols)-1 do
+                cell_range.Width += grid_cols[j].W;
+        end
         cell_range.Calc();
         tc_x += grid_cols[i].W;
         if cell_range.DynamicHeight > max_height then max_height := cell_range.DynamicHeight;