Dretet博士获得pixmap宽度/高度

Question

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

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

Answer 1

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

这是一个简单的程序，它使用2htdp /图像库从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)

您可能需要更新路径....