racket - Racket 博士获取像素图宽度/高度

Question

我正在为大学做一个项目，想知道是否有可能以某种方式获得像素图的高度和宽度。我知道矩形和圆形之类的东西是可能的...我正在使用它来绘制像素图，文件是jpg：

(define (draw-image! x y file)
  (let ((posn (my-make-posn x y)))
    ((draw-pixmap MainWindow) file posn)))

Answer 1

也许您已经知道这一点，但您使用的库已被弃用：在手册中，您会看到它是“旧版库”的一部分。

这是一个简单的程序，它使用 2htdp/image 库从 jpg 加载图片、显示并打印其尺寸：

#lang racket

(require 2htdp/image)

(define pic
  (bitmap "/Users/clements/Pictures/Photo Booth Library/Pictures/Photo on 2012-02-12 at 10.53.jpg"))
pic
(image-height pic)
(image-width pic)

您可能必须更新路径....