scheme - 比较图像宽度与数量失败

Question

此脚本在 if 语句处失败，并显示“错误:( : 1) >:参数 2 必须是:数字”，为什么？

(define x 1500)

(if(> x (gimp-image-width image))
(set! x (gimp-image-width image))
)

GIMP中使用的Scheme版本有什么好的引用吗？

Answer 1

当您在 script-fu 控制台中尝试时，gimp-image-width 返回一个列表而不是数字:

(gimp-image-width 1)
(400)

所以你必须提取列表的元素:

(define x 1500)
(if(> x (car (gimp-image-width 1)))
(set! x (gimp-image-width 1))
)

顺便说一句，如果您开始编写 Gimp 脚本，请使用 Python，这会容易得多:

width=min(1500,image.width)