GUI/Maximum window dimensions: Difference between revisions
Content added Content deleted
mNo edit summary |
|||
| Line 321: | Line 321: | ||
Sample output for a screen area 1600 x 1200: |
Sample output for a screen area 1600 x 1200: |
||
<pre>Maximum Window Width: 1600, Maximum Window Height: 1181</pre> |
<pre>Maximum Window Width: 1600, Maximum Window Height: 1181</pre> |
||
=={{header|Racket}}== |
|||
<lang racket> |
|||
#lang racket/gui |
|||
(define-values [W H] |
|||
(let ([f (new frame% [label "test"])]) |
|||
(begin0 (send* f (maximize #t) (show #t) (get-client-size)) |
|||
(send f show #f)))) |
|||
(printf "~ax~a\n" W H) |
|||
</lang> |
|||
=={{header|Run BASIC}}== |
=={{header|Run BASIC}}== |
||