tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルBMP画像の結合
記事No5042
投稿日: 2007/03/04(Sun) 21:27
投稿者kashi
Microsoft Visual Basic 2005 を使っています。

3つ以上の連番(同じサイズ)のビットマップを右方向につなげて
新しい1つのファイルにする方法がわかりません。

とりあえず、横方向につなげて1つにする方法を教えてください。

□+○+△→□○△

[ツリー表示へ]
タイトルRe: BMP画像の結合
記事No5043
投稿日: 2007/03/04(Sun) 21:56
投稿者YAS
横方向につなげた大きさのBitmapを用意し,そこに3つのBitmapを描画すればよいのではないでしょうか。3つをつなげるというよりも,4つめの大きなBitmapを作るという考えがよいと思います。

[ツリー表示へ]
タイトルRe^2: BMP画像の結合
記事No5045
投稿日: 2007/03/04(Sun) 22:29
投稿者kashi
なるほど…
大きなビットマップを作ってそれに貼り付けていくということですか。

で、そのビットマップの中での貼り付けはどうしていけばいいのでしょうか?
なんせ、最近勉強を始めたばかりのものですから・・・

今のところ、PictureBoxにずらして貼って取り出すのは完璧な失敗でした。

[ツリー表示へ]
タイトルRe^3: BMP画像の結合
記事No5047
投稿日: 2007/03/04(Sun) 23:19
投稿者花ちゃん
> なんせ、最近勉強を始めたばかりのものですから・・・
> 今のところ、PictureBoxにずらして貼って取り出すのは完璧な失敗でした。

ここのTips集の PictureBoxに文字を描画してファイルに保存
(画像を加工して保存・エラー回避) 等を利用すればできたかと思うのですが。

Private Sub Button1_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button1.Click
   Dim bmap As Bitmap = New Bitmap("c:\test.bmp")
   Dim picW As Long = bmap.Width
   Dim pich As Long = bmap.Height
   Dim g As Graphics
   With PictureBox1
      .Width = picW * 3
      .Height = pich
      .BackColor = Color.White
      .SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
      .Image = New Bitmap(.Size.Width, .Size.Height)
      g = Graphics.FromImage(.Image)
   End With
   g.DrawImage(bmap, 0, 0)
   g.DrawImage(bmap, picW - 1, 0)
   g.DrawImage(bmap, picW + picW - 2, 0)
   bmap.Dispose()
   g.Dispose()
   PictureBox1.Image.Save("c:\test99.bmp", Imaging.ImageFormat.Bmp)
End Sub

[ツリー表示へ]
タイトルRe^4: BMP画像の結合
記事No5068
投稿日: 2007/03/05(Mon) 21:00
投稿者kashi
解決しました。

ありがとうございました。


まだまだ未熟者ですので、これからも書き込みがあるかもしれませんが、そのときはよろしくお願いします。

[ツリー表示へ]