paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-07 23:38:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

gtk intf: heuristic to detect true type fonts, bug #16298

Browse Source 
git-svn-id: trunk@24780 -
This commit is contained in:
mattias 2010-04-21 07:31:33 +00:00
parent de4c8cb596
commit 2e66a93ebd
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/gtk/gtkwinapi.inc
View File

@ -3459,7 +3459,9 @@ var
function XLFDToFontType: integer; function XLFDToFontType: integer;
begin begin
if (xlfd.PointSize=0)and(xlfd.PixelSize=0) then if ((xlfd.PointSize=0) and (xlfd.PixelSize=0))
or ((xlfd.PointSize=120) and (xlfd.PixelSize=17)) // see bug 16298
then
result := TRUETYPE_FONTTYPE result := TRUETYPE_FONTTYPE
else else
result := RASTER_FONTTYPE or DEVICE_FONTTYPE; result := RASTER_FONTTYPE or DEVICE_FONTTYPE;