Tcl/tk:如何设置写入的jpeg文件的质量

Tcl/tk:如何设置写入的jpeg文件的质量,tcl,jpeg,tk,Tcl,Jpeg,Tk,考虑一下这个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”选项? 我在稀疏的可用文档中找不到任何内容 非常感谢。

考虑一下这个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”选项? 我在稀疏的可用文档中找不到任何内容


非常感谢。

文档非常稀少,但在读取和写入JPEG图像时,似乎支持以下选项:
-optimize
-progressive
-quality
-smooth
。你在写图像时通过它们的方式有点古怪:

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

是的,它们在
-format
选项中传递。(嘿,我并没有发明这种奇怪的黑客技术!)

文档非常稀少,但在阅读和编写JPEG图像时,这些选项似乎是受支持的:
-optimize
-progressive
-quality
,以及
-smooth
。你在写图像时通过它们的方式有点古怪:

# Write with 90% quality
tmpImg write $FName -format {jpeg -quality 90}
是的,它们在
-format
选项中传递。(嘿,我并没有发明这种奇怪的黑客!)

哇,的确,这很“时髦”:(不过,在tcl逻辑中,这是有道理的)。多谢了,的确,这很“时髦”:(不过在tcl逻辑中是有道理的)。谢谢