Hi Ajeje,
for binding you must implement DependencyProperty like this:
Public Shared ReadOnly myEndianessProperty As DependencyProperty =
DependencyProperty.RegisterAttached("myEndianess", GetType(String),
GetType(Window023UC1), New PropertyMetadata(String.Empty, AddressOf OnmyEndianessPropertyChanged))
Private Shared Sub OnmyEndianessPropertyChanged(d As DependencyObject, e As DependencyPropertyChangedEventArgs)
Dim uc = TryCast(d, Window023UC1)
If uc Is Nothing OrElse e.NewValue Is Nothing Then Exit Sub
uc.myEndianess = e.NewValue.ToString
End Sub
Public Shared Function GetFarbe(obj As DependencyObject) As Brush
Return CType(obj.GetValue(myEndianessProperty), Brush)
End Function
Public Shared Sub SetFarbe(obj As DependencyObject, value As Brush)
obj.SetValue(myEndianessProperty, value)
End Sub
Private Const m_Defaultendianess = "0"
Private _myendianess As String = m_Defaultendianess
<DefaultValue(m_Defaultendianess)>
Public Property myEndianess() As String
Get
Return _myendianess
End Get
Set(ByVal value As String)
SetAndNotify(_myendianess, value)
End Set
End Property