이미지를 나란히 놓기

Question

VB.net에서 두 개의 이미지를 결합하여 하나의 큰 이미지를 만드는 방법은 무엇입니까? 그들은 모두 1920x1080 jpeg이고 3840x1080 jpeg로 나옵니다. 이처럼

: 나는이 이미지를 얻을 : 나는 그것을 발견 2

Answer 1

이미지 옆에 이미지 1면 : 이미지 1

그리고이 밖으로 얻을 . 코드는 꽤 쉽습니다. 기본적으로 하나의 이미지에 두 개의 이미지가 있습니다.

 Dim ImageOne As System.Drawing.Image = Image.FromFile("img1") 
    Dim ImageTwo As System.Drawing.Image = System.Drawing.Image.FromFile("img2") 
    'replace path of image two with Image2.ImageUrl 
    Dim NewImageHeight As Integer = If(ImageOne.Height > ImageTwo.Height, ImageOne.Height, ImageTwo.Height) 
    'To calculate height of new image 
    Dim NewImageWidth As Integer = ImageOne.Width + ImageTwo.Width 
    ' width of new image 



    Dim NewImageBmp As New Bitmap(NewImageWidth, NewImageHeight, Imaging.PixelFormat.Format32bppArgb) 
    ' you can change the bpp as per your requirment. Size of image directly propotionate to bpp of image 

    Dim NewImageGrx As Graphics = System.Drawing.Graphics.FromImage(NewImageBmp) 


    NewImageGrx.DrawImageUnscaled(ImageOne, 0, 0) 
    'draw first image at coordinate 0,0 
    NewImageGrx.DrawImageUnscaled(ImageTwo, ImageOne.Width, 0) 
    'draw second image at coordinate image1.width,0 
    Dim CombineImage As String = Guid.NewGuid().ToString() + ".jpg" 
    NewImageBmp.Save("output file", ImageFormat.Jpeg) 
    ' saving combined image. You can specify the ImageFormat as per your requirment. 

    'disposing objects after use 
    ImageOne.Dispose() 
    ImageTwo.Dispose() 


    NewImageBmp.Dispose() 
    NewImageGrx.Dispose()