+- QB64 Phoenix Edition (https://qb64phoenix.com/forum)
+-- Forum: Chatting and Socializing (https://qb64phoenix.com/forum/forumdisplay.php?fid=11)
+--- Forum: General Discussion (https://qb64phoenix.com/forum/forumdisplay.php?fid=2)
+--- Thread: DPI aware? (/showthread.php?tid=3557)
DPI aware? - Jack - 03-25-2025
I have my PI-5 hooked up to a large screen 3840x2160 and changed the default display setting for large screen, I don't know the actual aspect ratio as there were only 3 options, set default for large, medium or small screen
setting the default for large screen works well except for QB64pe, if I change the Font size in pixels from 19 to 21 then the IDE looks ok but the programs display in a tiny window with tiny fonts, same when using $Console:Only
any plans to make QB64pe DPI aware ?
RE: DPI aware? - Kernelpanic - 03-27-2025
I guess DPI isn't going anywhere.
Forget it! That's life!RE: DPI aware? - James D Jarvis - 03-30-2025
(03-25-2025, 01:56 PM)Jack Wrote: I have my PI-5 hooked up to a large screen 3840x2160 and changed the default display setting for large screen, I don't know the actual aspect ratio as there were only 3 options, set default for large, medium or small screen
setting the default for large screen works well except for QB64pe, if I change the Font size in pixels from 19 to 21 then the IDE looks ok but the programs display in a tiny window with tiny fonts, same when using $Console:Only
any plans to make QB64pe DPI aware ?
Not sure it will meet all of your needs but one solution is to write most of your program output to a canvas layer and put that canvas layer on a scaled up output screen.
This example code creates a canvas layer that is set to fixed pixel size and a main screen that is 80% of your desktop size.
Code: (Select All)
Dim Shared canvas&, mscreen&
canvas& = _NewImage(360, 240, 256)
DTW = _DesktopWidth
DTH = _DesktopHeight
mscreen& = _NewImage(DTW * .8, DTH * .8, 256) 'this will make a maiscreen for the program 80% the size of the desktop
Screen mscreen&
_ScreenMove 20, 20
_Dest canvas& 'output to canvas
Print "Hello"
Print "01234567890123456789012345678901234567890123456789012345678901234567890123456789" 'This will wrap becasue 360 is pretty narrow
Print
Print "Press ANY KEY"
_Dest mscreen& 'output to main screen
_PutImage , canvas& 'put the canavas on the screen
Line (0, 0)-(359, 239), 15, B 'this box is drawn on the mainscreem
_PrintString (362, 200), "<--- Box is size of Canavs But Drawn on Mainscreen" 'this message will be vanishingly small on large screens
Sleep
_Dest canvas& 'output to canvas
Cls
Color 14
Print "Hello"
Print "01234567890123456789012345678901234567890123456789012345678901234567890123456789" 'This will wrap becasue 360 is pretty narrow
Print
Print " Box is size of Canavs, Drawn on Canvas -->"
Print
Print "Press ANY KEY"
Line (0, 0)-(359, 239), 14, B 'this box is drawn on the canvas
_Dest mscreen& 'output to main screen
_PutImage , canvas& 'put the canavas on the screen
Sleep
RE: DPI aware? - Gets - 04-01-2025
Quickest approach my be to add RESIZE so you can stretch out lower resolution programs. QB64 isn't designed to adjust those parameters for you because they're under the programmer's control or in line with Qbasic various SCREEN settings. If you want relative settings you need to create the functions yourself like James' example. If you want to make adjustments based on system settings, you probably need a library that provides access to them