Как я могу нарисовать несколько растровых изображений с помощью ракетки / графического интерфейса и / или ракетки / рисовать на одном и том же холсте, даже на фоне?
Я думаю, может быть, мне нужно нарисовать фон, а затем сделать надписи для содержаниярастровое изображение, но я не знаю.
Вот код для загрузки и рисования только фона.
#lang racket/gui
(require racket/draw)
(define frame (new frame%
[label "BlaCEkJack"]
[width 800]
[height 800]
[style (list 'no-resize-border)]))
(define bg (read-bitmap "Fondo.png"))
(define bitmap-canvas%
(class canvas%
(init-field [bitmap #f])
(inherit get-dc)
(define/override (on-paint)
(send (get-dc) draw-bitmap bitmap 0 0))
(super-new)))
(define mycanvas (new bitmap-canvas% [parent frame] [bitmap bg]))
(send frame show #t)