anchor.diff:              if CellObj.FSpecHt.Value < SpecRowHeight.Value then
                 CellObj.FSpecHt.Value := SpecRowHeight.Value;
   
  +          wtNone,
             wtRelative: // percentage is stronger
               CellObj.FSpecHt := SpecRowHeight;
  +
           else
             // keep specified absolute value
           end;
  
positive.code:         Inc(Cnt, J);
        until Cnt >= NN;
  
      SB := 0; {if there are images, then maybe they add extra space}
      SA := 0; {space before and after}
        if LineHeight > DHt then
        begin
          // BG, 28.08.2011: too much space below an image: SA and SB depend on Align:
          case Align of
            aTop:
              SA := LineHeight - DHt;
  
            aMiddle:
              begin
                SB := (LineHeight - DHt) div 2;
                SA := (LineHeight - DHt) - SB;
              end;
          else
  //          aNone:
  //          aBaseline,
  //          aBottom:
              SB := LineHeight - DHt;
          end;
        end;
      Cnt := 0;
      repeat
        Cnt := Cnt + Images.GetImageCountAt(PStart - Buff + Cnt);
  
negative.code:           // keep specified absolute value
          end;
  
        wtAbsolute:
          case CellObj.FSpecHt.VType of
            wtAbsolute:
              if CellObj.FSpecHt.Value < SpecRowHeight.Value then
                CellObj.FSpecHt.Value := SpecRowHeight.Value;
          else
            // absolute value is stronger
            CellObj.FSpecHt := SpecRowHeight;
          end;
      end;
    end;
  end;
  