| 12345678910111213141516171819202122232425262728293031323334 |
- Public Class MyImage
- Inherits Image
- '事件
- Public Uuid As Integer = GetUuid()
- Private _SourceData As String = ""
- ''' <summary>
- ''' 重写Image的Source属性
- ''' </summary>
- Public Shadows Property Source As String
- Get
- Return _SourceData
- End Get
- Set(value As String)
- SetImage(value)
- End Set
- End Property
- Public Shared Shadows ReadOnly SourceProperty As DependencyProperty = DependencyProperty.Register("Source", GetType(String), GetType(MyImage), New PropertyMetadata(New PropertyChangedCallback(
- Sub(sender As DependencyObject, e As DependencyPropertyChangedEventArgs)
- If Not IsNothing(sender) Then
- CType(sender, MyImage).SetImage(e.NewValue)
- End If
- End Sub)))
- Private Sub SetImage(source As String)
- If Me Is Nothing Then Exit Sub
- If String.IsNullOrEmpty(source) Then Exit Sub
- _SourceData = source
- MyBase.Source = New MyBitmap(_SourceData)
- End Sub
- End Class
|