anchor.diff:      Min := Math.Max(MinCell, MargArray[piWidth]) + LeftSide + RightSide;
       Max := Math.Max(MaxCell, MargArray[piWidth]) + LeftSide + RightSide;
     end;
  -   {$IFDEF JPM_DEBUGGING}
  -   CodeSite.SendFmtMsg('Min = [%d]',[Min]);
  -   CodeSite.SendFmtMsg('Max = [%d]',[Max]);
  -
  -  CodeSite.ExitMethod(Self,'TBlock.MinMaxWidth');
  -   {$ENDIF}
  +
  +{$IFDEF JPM_DEBUGGING}
  +  finally
  +    CodeSite.SendFmtMsg('Min = [%d]',[Min]);
  +    CodeSite.SendFmtMsg('Max = [%d]',[Max]);
  +
  +    CodeSite.ExitMethod(Self,'TBlock.MinMaxWidth');
  +  end;
  +{$ENDIF}
   end;
   
   {----------------TBlock.GetURL}
  
positive.code: //  // added to the processing list directly. This ends up in a list of block level elements, just like TCellBasic has
  //  // been before property Display was introduced.
  //  //
  //  // Actually TInlineSection collects content of TSections of consecutive inline elements and must draw borders and
  //  // background of the inlined elements.
  //  InlineSection := nil;
  //  FRenderList.Clear;
  //  for I := 0 to Count - 1 do
  
negative.code: constructor TSection.Create(Parent: TCellBasic);
  begin
    inherited Create(Parent, nil, nil);
    FDisplay := pdInline; // A section is always inline as the section is intended to handle consecutive inline elements.  
    Buff := PWideChar(BuffS);
    Fonts := TFontList.Create;
    Images := TSizeableObjList.Create;
  