f42356da3f
The main advantage of GTK+ 3 is better support for HiDPI displays. If GTK+ 3 libraries are not available or if the `PLT_GTK2` environment variable is defined, GTK+ 2 is used as before.
97 lines
1.9 KiB
Racket
97 lines
1.9 KiB
Racket
#lang racket/base
|
|
(require "init.rkt"
|
|
"button.rkt"
|
|
"canvas.rkt"
|
|
"check-box.rkt"
|
|
"choice.rkt"
|
|
"clipboard.rkt"
|
|
"cursor.rkt"
|
|
"dialog.rkt"
|
|
"frame.rkt"
|
|
"gauge.rkt"
|
|
"group-panel.rkt"
|
|
"item.rkt"
|
|
"list-box.rkt"
|
|
"menu.rkt"
|
|
"menu-bar.rkt"
|
|
"menu-item.rkt"
|
|
"message.rkt"
|
|
"panel.rkt"
|
|
"printer-dc.rkt"
|
|
"radio-box.rkt"
|
|
"slider.rkt"
|
|
"tab-panel.rkt"
|
|
"window.rkt"
|
|
"procs.rkt")
|
|
(provide
|
|
(protect-out platform-values))
|
|
|
|
(define (platform-values)
|
|
(values
|
|
button%
|
|
canvas%
|
|
canvas-panel%
|
|
check-box%
|
|
choice%
|
|
clipboard-driver%
|
|
cursor-driver%
|
|
dialog%
|
|
frame%
|
|
gauge%
|
|
group-panel%
|
|
item%
|
|
list-box%
|
|
menu%
|
|
menu-bar%
|
|
menu-item%
|
|
message%
|
|
panel%
|
|
printer-dc%
|
|
radio-box%
|
|
slider%
|
|
tab-panel%
|
|
window%
|
|
can-show-print-setup?
|
|
show-print-setup
|
|
id-to-menu-item
|
|
file-selector
|
|
is-color-display?
|
|
get-display-depth
|
|
has-x-selection?
|
|
hide-cursor
|
|
bell
|
|
display-size
|
|
display-origin
|
|
display-count
|
|
display-bitmap-resolution
|
|
flush-display
|
|
get-current-mouse-state
|
|
fill-private-color
|
|
cancel-quit
|
|
get-control-font-face
|
|
get-control-font-size
|
|
get-control-font-size-in-pixels?
|
|
get-double-click-time
|
|
file-creator-and-type
|
|
location->window
|
|
shortcut-visible-in-label?
|
|
unregister-collecting-blit
|
|
register-collecting-blit
|
|
find-graphical-system-path
|
|
play-sound
|
|
get-panel-background
|
|
font-from-user-platform-mode
|
|
get-font-from-user
|
|
color-from-user-platform-mode
|
|
get-color-from-user
|
|
special-option-key
|
|
special-control-key
|
|
get-highlight-background-color
|
|
get-highlight-text-color
|
|
make-screen-bitmap
|
|
make-gl-bitmap
|
|
check-for-break
|
|
key-symbol-to-menu-key
|
|
needs-grow-box-spacer?
|
|
graphical-system-type))
|