[ツリー表示へ] [ワード検索] [Home]
タイトル ： Re^2: 画像の一部を切り取って保存するには？ 投稿日 ： 2008/10/31(Fri) 23:20 投稿者 ： 蒼月
| 花ちゃんさん 遅くなってしまい、申し訳ありません。 解決しました。 Rectangleで指定する座標とDrawImageで指定する座標の認識を 逆に理解していたのが原因でした。 Rectangleに指定していた座標をDrawImageに、 DrawImageに指定していた座標をRectangleに入れ替えることで、 うまく実行することができました。 最終的にはモノクロビットマップとして保存する必要があったため、 下記のようになりました。 '保存した帳票を読込む Dim bmp1 As New Bitmap(Path) Dim BmpFilePath As String = Application.StartupPath& "\Print.bmp" '必要部分のみを切り取る Dim rect1 As New Rectangle(0, 650, 2280, 984) Dim bmp2 As Bitmap = bmp1.Clone(rect1,PixelFormat.Format1bppIndexed) '保存 bmp2.Save(BmpFilePath,ystem.Drawing.Imaging.ImageFormat.Bmp) '破棄 bmp1.Dispose() bmp2.Dispose() ># 下記で質問されている方と同じ方ではないですかね。984×2280ピクセル を扱う > 人がそうはいないように思うのですが。 はい。 それは両方とも私が投稿したものです。 不快な思いをさせてしまったのでしたら、申し訳ありませんでした。 |
をクリックするとツリー全体を一括表示します） - 画像の一部を切り取って保存するには？ - 蒼月 08/10/29-01:10No.8390