tcl - Tcl/tk：如何设置写入jpeg文件的质量

Question

考虑这个 tcl/tk 代码：它采用 PPM 格式的 RGB 数据并将其保存到 JPG 文件中

image create photo tmpImg -data $Data -width $Width -height $Height -format ppm
tmpImg write $FName -format jpeg
image delete tmpImg

我的问题是：如何设置生成的 JPEG 图片的质量？Img::jpeg 中是否有“-quality”选项？我在可用的稀疏文档中找不到任何东西......

非常感谢。

Answer 1

文档相当稀疏，但在读取和写入 JPEG 图像时似乎支持这些选项：-optimize、-progressive、-quality和-smooth. 编写图像时传递它们的方式有点时髦：

# Write with 90% quality
tmpImg write $FName -format {jpeg -quality 90}

是的，它们在选项内部-format传递。（嘿，这个奇怪的黑客不是我发明的！）