- Код: Выделить всё
Dim g As Graphics = Graphics.FromHdc(hdc)
Dim mypoint As New Drawing.PointF(100, 100)
g.DrawImage(Image.FromFile("myimage.gif"), mypoint)
Как мне очистить область рисования, вернуть её к исходному состоянию?
Спасибо
Dim g As Graphics = Graphics.FromHdc(hdc)
Dim mypoint As New Drawing.PointF(100, 100)
g.DrawImage(Image.FromFile("myimage.gif"), mypoint)
Declare Auto Function InvalidateRect Lib "user32" (ByVal hwnd As IntPtr, ByVal Rc As RECT, ByVal B As Boolean) As Boolean
Public Structure RECT
Dim Left As Integer
Dim Top As Integer
Dim Right As Integer
Dim Bottom As Integer
End Structure
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 104