scheme - 如何在球拍中使用像素图将图像添加为结构

Question

我在文件中创建了一个图像：

(define zero-zero (add-curve
                   (rectangle 35 60 "solid" "white")
                   0 30 0 0
                   36 30 0 0
                   "black"))

我在一个新文件中将它重命名为结构：

(define-struct Ficha (nombre valor))
(define 0-0 (make-Ficha "zero-zero" zero-zero))

我创建了一个窗口来使用 pixmap 在其上显示图像，想法是在窗口上创建的矩形中生成此图像：但是，它不显示它：

 (define ventana (open-viewport "ventana" 1200 600))
 ((draw-rectangle ventana) (make-posn 50 50) 1100 300 "black")
(((draw-pixmap (Ficha-valor 0-0) ventana)(make-posn 60 400 ))

我对你们的问题是如何使用带有像素图的结构添加图像，或者如果您可以建议其他功能。

提前致谢

标签： schemeracketpixmap