呼叫 API BitBlt 將兩張圖疊繪在一起
targetImage | Bitmap | 4 | 必須 | (無) | 目標圖片物件 (下層) | ||||||||||||||||||||||||||||||||||||||||||||||||
sourceImage | Bitmap | 4 | 必須 | (無) | 來源圖片物件 (上層) | ||||||||||||||||||||||||||||||||||||||||||||||||
vLocation | Point | 8 | 必須 | (無) | 來源圖片左上角啟始位置,一般為 (0, 0) | ||||||||||||||||||||||||||||||||||||||||||||||||
vRectangle | Rectangle | 16 | 必須 | (無) | 畫到目標圖片的位置 | ||||||||||||||||||||||||||||||||||||||||||||||||
opCode | RasterOperationCode | 4 | 可省略 | SrcCopy | 點陣圖運算旗標:
|
傳回 Bitmap
Private Sub PictureBox1_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDoubleClick Dim sourceBitmap As Image = Image.FromFile("d:\Temp\圖形.jpg") PictureBox1.Image = PaintImage(PictureBox1.Image, sourceBitmap, New Drawing.Point(0, 0), New Rectangle(40, 40, sourceBitmap.Width, sourceBitmap.Height)) End Sub
Visual Studio .Net 2002 以後相容版本 | Graphic.vb
|