GUI/Maximum window dimensions: Difference between revisions

Added BaCon version.
m (Phix/pGUI)
(Added BaCon version.)
Line 85:
 
Because Axe is currently (6/22/2015) only available on the TI-83/84 black and white calculators, the screen dimensions are fixed at 96 by 64 pixels.
 
=={{header|BaCon}}==
Requires BaCon version 4.0.1 or higher, using GTK3.
<lang bacon>OPTION GUI TRUE
PRAGMA GUI gtk3
 
FUNCTION Define_Window
 
LOCAL (*max)() = gtk_window_maximize TYPE void
LOCAL id
 
id = GUIDEFINE("{ type=WINDOW name=window }")
CALL GUIFN(id, "window", max)
 
RETURN id
 
ENDFUNCTION
 
SUB Print_Dimensions
 
LOCAL (*size)() = gtk_window_get_size TYPE void
LOCAL x, y
 
CALL GUIFN(gui, "window", size, &x, &y)
PRINT x, "-", y
END
 
ENDSUB
 
gui = Define_Window()
 
ALARM Print_Dimensions, 500
 
event$ = GUIEVENT$(gui)</lang>
{{out}}
Output on my 1600x900 screen:
<pre>1600-838</pre>
 
=={{header|BBC BASIC}}==
Anonymous user