anchor.diff:  var
     IsTiledGpImage: Boolean;
   begin
  +  if (IW = 0) or (IH = 0) then
  +    exit;
  +
     if (BGImage.Image is TBitmap) then
     begin
       TheGpObj := TBitmap(BGImage.Image);
  
positive.code:   begin
      AddDummyCellsForColSpansAndInitializeCells;
      AddDummyCellsForRowSpans;
  
      NumCols := 0;
      for Rw := 0 to Rows.Count - 1 do
        NumCols := Max(NumCols, Rows[Rw].Count);
  
      for Rw := 0 to Rows.Count - 1 do
      begin
  
negative.code:               Canvas.FillRect(Rect(PdRect.Left, FT, PdRect.Right, FT + IH));
          end;
  
          if ImgOK and (TiledImage <> nil) then
          begin
            if not Document.IsCopy then
              {$IFNDEF NoGDIPlus}
  