paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 20:59:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

fpvectorial: svg: Adds numbers as bold too

Browse Source 
git-svn-id: trunk@44396 -
This commit is contained in:
sekelsenmat 2014-03-10 09:58:48 +00:00
parent bfe8c53b66
commit bbcdb509b3
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/fpvectorial/svgvectorialreader.pas
View File

@ -959,7 +959,7 @@ begin
else if AKey = 'font-weight' then else if AKey = 'font-weight' then
begin begin
case lLowerValue of case lLowerValue of
'bold': ADestEntity.Font.Bold := True; 'bold', '700', '800', '900': ADestEntity.Font.Bold := True;
end; end;
end end
// Other text attributes, non-font ones // Other text attributes, non-font ones
@ -1009,7 +1009,7 @@ begin
else if AKey = 'font-weight' then else if AKey = 'font-weight' then
begin begin
case lLowerValue of case lLowerValue of
'bold': ADest.Font.Bold := True; 'bold', '700', '800', '900': ADest.Font.Bold := True;
else else
ADest.Font.Bold := False; ADest.Font.Bold := False;
end; end;