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]); s += Format(' border-color: %s;%s', [ColorToHex(p^.BorderColor),LineEnding]);
end; end;
case p^.Alignment of case p^.Alignment of
taRightJustify: s += ' align="right";'; taRightJustify: s += ' text-align: right;';
taCenter: s += ' align="center";'; taCenter: s += ' text-align: center;';
else else
s += ' align="left";'; s += ' text-align: left;';
end; end;
s += ' } '+LineEnding+LineEnding; s += ' } '+LineEnding+LineEnding;
end; end;