ラケットにアイコンやpictのボタンをデザインするには？

Question

私はボタンをやりたいので、Dr Racketでウィンドウイングをするときにもっとうまく見えます。私はそれを行う方法の例とどこにアイコンが格納されているのか見当たりませんでした。

イザベル

Answer 1

あなたはビットマップをロードし、新しいボタン％を作るときlabel引数としてそれを使用することができます。

#lang racket/gui 

(define frame (new frame% [label ""])) 
(define button-icon (read-bitmap "path/to/image")) 
(define button (new button% [label button-icon] [parent frame])) 

(send frame show #t)