さて、これを行う方法を見つけたので、解決策を共有したいと思いました. コードは次のとおりです。
img := ImageReadWriter formFromFileNamed: 'pic.jpg'.
scaledimage := img magnifyBy: 0.8.
PluginBasedJPEGReadWriter
putForm: scaledimage
quality: 95
progressiveJPEG: false
onFileNamed: 'scaledPicture95.jpg'.
scaledimage writeJPEGfileNamed: 'scaledPictureDfl.jpg'.
このようにして、画像を倍率 (この場合は 0.8) でスケーリングできます。1 より大きい係数も機能します。さらに、JPEG 品質を指定できます。この例では 95 を選択しました。フラグ プログレッシブ JPEG を使用すると、画像を作成できます。この画像は、ロード時にブラウザのプレビュー品質に表示され、送信されるデータが多いほど良くなります。ただし、これはすべてのブラウザでサポートされているわけではありません! 最後の行はオプションで、比較用にデフォルト設定で 2 番目の JPEG を保存するだけです。これから探している方の参考になれば幸いです。
ヘンネ