paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 07:39:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

TurbopPower_ipro: Fix alignment of simple text in table cells (note: not working any more for div tags within cells)

Browse Source 
git-svn-id: trunk@58852 -
This commit is contained in:
wp 2018-09-04 10:58:10 +00:00
parent 2a0d5ff211
commit 9f3839bc3a
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/turbopower_ipro/iphtmlblocklayout.pas
View File

@ -511,12 +511,11 @@ begin
FBlockDescent := PropA.tmDescent;
end;
if (FCurProps = nil) or not BIsEqualTo(FCurProps) then begin
// FAl := self.Props.Alignment; // was: FAl := Alignment
// wp: next line was changed to "FAl := self.Props.Alignment" in order
FAl := self.Props.Alignment; // was: FAl := Alignment
// wp: line was changed to "FAl := self.Props.Alignment" in order
// to fix horizontal text alignment of table cells (r50145).
// But with this change, something like "<p align="center"> does not work any more!
// Alignment within cells still seems to work correctly after user to old code.
FAl := Alignment;
FVAL := VAlignment;
FBaseOffset := FontBaseline;
aPrefor := Preformatted;