タイトル | : Re^2: 画像を相対縮小して、保存 |
記事No | : 9222 |
投稿日 | : 2009/07/29(Wed) 19:56 |
投稿者 | : bin |
> 実際にテストしたわけではありませんが >
> > 画像の元サイズは分かっているのでしょうか? > 元サイズが分かれば高さ、幅を同じ比率で縮小、拡大すればよいのでは? > > > > Dim small As Bitmap = New Bitmap(bmp, 150, 120) > > > Dim small As Bitmap = New Bitmap(bmp, org_size_w * 0.25, org_size_h * 0.25)
レス 有難うございます。 元画像はファイル名がわかっているだけです。 ( 150, 120 )では縮小後の縦長の画像が元画像の縮小版ではなく なると思います。 そこで相対縮小にしようとしました。
環境は画像は JPG VB2008 expess edition です。 元画像が縦長か横長かがわかればよいのですが、ご存じでしたら お教えください。 よろしくお願いします。
|