Misstyped css style text alignment

This commit is contained in:
Jacek Rydzewski 2022-01-21 23:51:42 +00:00
parent c1ca9a357d
commit 89f30d2477

View File

@ -372,10 +372,10 @@ begin
s += Format(' border-color: %s;%s', [ColorToHex(p^.BorderColor),LineEnding]);
end;
case p^.Alignment of
taRightJustify: s += ' align="right";';
taCenter: s += ' align="center";';
taRightJustify: s += ' text-align: right;';
taCenter: s += ' text-align: center;';
else
s += ' align="left";';
s += ' text-align: left;';
end;
s += ' } '+LineEnding+LineEnding;
end;