mmbguide
یک شنبه 26 مرداد 1393, 22:21 عصر
سلام به همه
Private testImage As Bitmap = Bitmap.FromFile("c:\bitmaps\test1.jpg")
Private Sub Form3_Paint(sender As Object, e As PaintEventArgs) Handles Me.Paint
'attribs setting for transparent using range of color
Dim attribs As New System.Drawing.Imaging.ImageAttributes
attribs.SetColorKey(Color.FromArgb(50, 50, 50), Color.FromArgb(255, 255, 255))
'draw pic with transparent color
Dim dst As New Rectangle(10, 10, testImage.Width, testImage.Height)
e.Graphics.DrawImage(testImage, dst, 0, 0, testImage.Width, testImage.Height, GraphicsUnit.Pixel, attribs)
End Sub
سوال:
خط 1 چی میگه؟ و چرا به این شکل تعریف شده؟
خط 7 چی میگه؟
خط 12 که تصویر را در زمینه فرم ترسیم میکنه رو چطور میشه در یک PicturBox رسم کرد؟ (البته خارج از رویداد Paint مربوط به فرم بلکه با کلیک روی یک دکمه)
Private testImage As Bitmap = Bitmap.FromFile("c:\bitmaps\test1.jpg")
Private Sub Form3_Paint(sender As Object, e As PaintEventArgs) Handles Me.Paint
'attribs setting for transparent using range of color
Dim attribs As New System.Drawing.Imaging.ImageAttributes
attribs.SetColorKey(Color.FromArgb(50, 50, 50), Color.FromArgb(255, 255, 255))
'draw pic with transparent color
Dim dst As New Rectangle(10, 10, testImage.Width, testImage.Height)
e.Graphics.DrawImage(testImage, dst, 0, 0, testImage.Width, testImage.Height, GraphicsUnit.Pixel, attribs)
End Sub
سوال:
خط 1 چی میگه؟ و چرا به این شکل تعریف شده؟
خط 7 چی میگه؟
خط 12 که تصویر را در زمینه فرم ترسیم میکنه رو چطور میشه در یک PicturBox رسم کرد؟ (البته خارج از رویداد Paint مربوط به فرم بلکه با کلیک روی یک دکمه)