Text Only | Text with Attachments

QB64.org Forum

Active Forums => QB64 Discussion => Topic started by: xband on July 15, 2019, 02:02:33 pm

Title: Font Clipping
Post by: xband on July 15, 2019, 02:02:33 pm
Some fonts are getting cut off at the top using _PRINTSTRING. It happens with consolas and a handful of other fonts.

Is this a bug?

Code: QB64: [Select]
  2. DIM mscreen AS INTEGER
  3. DIM rootpath AS STRING
  4. DIM fontfile AS STRING
  5. DIM fonthandle AS INTEGER
  6.  
  7. DIM xoffset AS INTEGER
  8. DIM yoffset AS INTEGER
  9.  
  10. DIM CH(1 TO 72) AS STRING
  12. FOR i = 1 TO 63
  13.     CH(i) = CHR$(33 + i)
  15. CH(64) = "{"
  16. CH(65) = "|"
  17. CH(66) = "}"
  18. CH(67) = "~"
  19. CH(68) = CHR$(30)
  20. CH(69) = CHR$(31)
  21. CH(70) = CHR$(16)
  22. CH(71) = CHR$(17)
  23. CH(72) = CHR$(1)
  24.  
  25.  
  26. rootpath = ENVIRON$("SYSTEMROOT")
  27. fontfile = "consola.ttf"
  28. fonthandle = _LOADFONT(fontfile, 60, "MONOSPACE")
  29.  
  30. mscreen = _NEWIMAGE(1024, 1024, 32)
  31. SCREEN mscreen
  32.  
  33. _FONT fonthandle, mscreen
  34. xoffset = 0
  35. yoffset = 0
  36.  
  37. '_CLEARCOLOR _RGB(0, 0, 0), mscreen
  39.  
  41.     CLS , _RGB(30, 30, 30)
  42.     '===============
  43.     xoffset = 0
  44.     yoffset = 0
  45.     FOR i = 1 TO 72
  46.         _PRINTSTRING (xoffset, yoffset), CH(i)
  47.         xoffset = xoffset + 64
  48.         IF xoffset > 960 THEN
  49.             xoffset = 0
  50.             yoffset = yoffset + 64
  51.         END IF
  52.     NEXT
  53.     '===============
  54.     _LIMIT 60
  55.     _DISPLAY
  57.  
  58.  
  59.  
Title: Re: Font Clipping
Post by: Petr on July 15, 2019, 02:09:27 pm
Hi. It's a known bug. I wouldn't expect any repair anytime soon.
We talking about this year back.... https://www.qb64.org/forum/index.php?topic=247.msg1301;topicseen#msg1301
Title: Re: Font Clipping
Post by: xband on July 15, 2019, 02:18:09 pm
ah ok, fortunately i was able to find a different font with a similar style that didn't clip. thanks.
Title: Re: Font Clipping
Post by: OldMoses on July 15, 2019, 08:58:43 pm
OK, that explains the effect I'm seeing in my project, though it seems to manifest at different points inconsistently. Not a major issue as it can still be read well enough to tell what's going on.
Text Only | Text with Attachments