Selaa lähdekoodia

layouter: fixed paddingbottom

mattias 2 vuotta sitten
vanhempi
commit
8f8266af6f
1 muutettua tiedostoa jossa 2 lisäystä ja 1 poistoa
  1. 2 1
      src/fresnel.layouter.pas

+ 2 - 1
src/fresnel.layouter.pas

@@ -744,7 +744,8 @@ begin
       end;
     end;
 
-    ChildBorderBoxHeight:=ChildBorderTop+ChildPaddingTop+ChildHeight+ChildPaddingBottom+ChildPaddingBottom;
+    ChildBorderBoxHeight:=ChildBorderTop+ChildPaddingTop+ChildHeight+ChildPaddingBottom+ChildBorderBottom;
+    //debugln(['TFLBlockFormattingContext.ComputeLayoutBorderBox ',ChildEl.Name,' ',ChildBorderBoxHeight,':=BT ',ChildBorderTop,'+PT ',ChildPaddingTop,'+H ',ChildHeight,'+PB ',ChildPaddingBottom,'+BB ',ChildBorderBottom]);
     if FFirstLineNodeIndex<0 then
     begin
       // first element in line