1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-04 04:50:22 +00:00

Merge branch 'QB64-Phoenix-Edition:main' into toolchain-upgrade

This commit is contained in:
Samuel Gomes 2023-12-09 07:17:56 +05:30 committed by GitHub
commit 8ea89bb863
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -16268,8 +16268,9 @@ FUNCTION idedisplaybox
IF o(7).sel = 1 AND x = 1 THEN
oldhandle = idecustomfonthandle
idecustomfonthandle = _LOADFONT(v$, v%, "MONOSPACE")
IF idecustomfonthandle = -1 THEN
IF idecustomfonthandle < 1 THEN
'failed! - revert to default settings
_MessageBox "Font not found!", "ERROR: Font not found, or is invalid format, at specified location. Reverting back to existing font.", "error"
o(7).sel = 0: idetxt(o(8).txt) = "C:\Windows\Fonts\lucon.ttf": idetxt(o(9).txt) = "21": IF IDE_UseFont8 THEN _FONT 8 ELSE _FONT 16
ELSE
_FONT idecustomfonthandle