How to: Obtain a Writable Copy of a Read-Only Freezable
The following example creates a modifiable clone of a frozen SolidColorBrush object.
Dim myButton As New Button() Dim myBrush As New SolidColorBrush(Colors.Yellow) ' Freezing a Freezable before it provides ' performance improvements if you don't ' intend on modifying it. If myBrush.CanFreeze Then ' Makes the brush unmodifiable. myBrush.Freeze() End If myButton.Background = myBrush ' If you need to modify a frozen brush, ' the Clone method can be used to ' create a modifiable copy. Dim myBrushClone As SolidColorBrush = myBrush.Clone() ' Changing myBrushClone does not change ' the color of myButton, because its ' background is still set by myBrush. myBrushClone.Color = Colors.Red ' Replacing myBrush with myBrushClone ' makes the button change to red. myButton.Background = myBrushClone