色を変更するには、次のキーを使用します。
PropertyInspectorBackgroundBrushKey
PropertyInspectorBorderBrushKey
PropertyInspectorCategoryCaptionTextBrushKey
PropertyInspectorPaneBrushKey
PropertyInspectorToolBarBackgroundBrushKey
PropertyInspectorSelectedBackgroundBrushKey
PropertyInspectorSelectedForegroundBrushKey
Dim Designer As New WorkflowDesigner()
Dim rd As String = "<ResourceDictionary
x:Uid='ResourceDictionary_1' xmlns='http://schemas.microsoft.com/winfx/2006/xaml/presentation'
xmlns:x='http://schemas.microsoft.com/winfx/2006/xaml'
xmlns:sap='clr-namespace:System.Activities.Presentation;assembly=System.Activities.Presentation'
xmlns:sapv ='clr-namespace:System.Activities.Presentation.View;assembly=System.Activities.Presentation'>
<SolidColorBrush x:Uid='SolidColorBrush_01' x:Key='{x:Static sap: WorkflowDesignerColors.PropertyInspectorBackgroundBrushKey}' Color='Red'/>
</ResourceDictionary>"
Dim reader As New StringReader(rd)
Dim xmlReader As XmlReader = XmlReader.Create(reader)
Dim fontAndColorDictionary As ResourceDictionary = DirectCast(System.Windows.Markup.XamlReader.Load(xmlReader), ResourceDictionary)
Dim hashTable As New Hashtable()
For Each key As String In fontAndColorDictionary.Keys
hashTable.Add(key, fontAndColorDictionary(key))
Next
Designer.PropertyInspectorFontAndColorData = XamlServices.Save(hashTable)