使用.NET将两个PNG图像组合成一个图像

Question

我在我的应用程序中有两个（实际上很多）PNG（.png）图像。这两处都有透明区域。

我想在我的应用程序中将两个图像合并起来，并将结果显示在图片框中。稍后我想通过按钮保存结果。

到目前为止，我设法找到两个图像并将它们结合起来，但它似乎透明的东西不会工作。我的意思是，如果您将一张图片放在另一张图片上，则只有顶部图片可见，因为显然图片的背景是纯白色的框。它不是。

这里有点我的代码：

Dim Result As New Bitmap(96, 128) 
    Dim g As Graphics = Graphics.FromImage(Result) 
    Dim Name As String 
    For Each Name In BasesCheckList.CheckedItems 
     Dim Layer As New Bitmap(resourcesPath & "Bases\" & Name) 
     For x = 0 To Layer.Width - 1 
      For y = 0 To Layer.Height - 1 
       Result.SetPixel(x, y, Layer.GetPixel(x, y)) 
      Next 
     Next 
     Layer = Nothing 
    Next 

resourcesPath是通向我的资源文件夹中。 Bases是其中的一个文件夹。而Name是图片的名称。

Answer 1

我相信你的缩放问题可能与具有不同DPI的图像有关。如果是这种情况，你真的想要DrawImage（），因为它会重新调整图像，以便它们匹配图形对象的DPI。一个警告：如果你没有提供尺寸DrawImage（）它与DrawImageUnscaled（）出于某种原因做了同样的事情。

Dim result As New Bitmap(96, 128) 

Dim directoryName As String = String.Format("{0}Bases", resourcesPath) 
Using g As Graphics = Graphics.FromImage(result) 
    For Each imageName As String In BasesCheckList.CheckedItems 
     Dim fileName As String = IO.Path.Combine(directoryName, imageName) 
     Using layer As New Bitmap(fileName) 
      g.DrawImage(layer, 0, 0, 96, 128) 
     End Using 
    Next 
End Using 

更详细的讨论是在Xtreme VB Talk论坛上，您决定交叉发布。不要在将来这样做，因为它会增加电线穿过的可能性，每个人都会浪费时间。

Answer 2

问题是您正在尝试手动完成此操作。别。有很多用于绘制图像的库例程，他们知道如何正确处理透明度。

Dim Result As New Bitmap(96, 128) 
Dim g As Graphics = Graphics.FromImage(Result) 
Dim Name As String 
For Each Name In BasesCheckList.CheckedItems 
    Dim Layer As New Bitmap(resourcesPath & "Bases\" & Name) 
    g.DrawImageUnscaled(Layer, 0, 0); 
    Layer = Nothing 
Next