Dr球拍获得像素图宽度/高度

Question

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

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

Answer 1

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

下面是从JPG加载图片的简单程序，显示它，并打印其尺寸，使用2htdp /图像库：

#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) 

你可能必须更新的路径... 。