Racket 球拍-将Pict导出到图像文件

如何将球拍图片导出为可在网页上使用的图像文件

（任何支持html的格式或数据uri都可以）

这将在“fish.png”中保存图像

#lang racket
(require pict)

(define (save-pict the-pict name kind)
  (define bm (pict->bitmap the-pict))
  (send bm save-file name kind))

(save-pict (standard-fish 200 200) "fish.png" 'png)