Private Sub XOBinit() xamOutlookBar1.VerticalSplitterLocation = VerticalSplitterLocation.Right xamOutlookBar1.VerticalSplitterResizeMode = SplitterResizeMode.Deferred xamOutlookBar1.IsVerticalSplitterVisible = True xamOutlookBar1.VerticalSplitterWidth = 10 Dim vsplitterPreviewStyle As Style = New Style(GetType(VerticalSplitterPreview)) vsplitterPreviewStyle.Setters.Add(New Setter(BackgroundProperty, New SolidColorBrush(Colors.Coral))) xamOutlookBar1.Resources.Add(XamOutlookBar.VerticalSplitterPreviewStyleKey, vsplitterPreviewStyle) Dim vsplitterStyle As Style = New Style(GetType(Thumb)) vsplitterStyle.Setters.Add(New Setter(BackgroundProperty, New SolidColorBrush(Colors.Chocolate))) vsplitterStyle.Setters.Add(New Setter(WidthProperty, 10.0)) xamOutlookBar1.Resources.Add(XamOutlookBar.VerticalSplitterStyleKey, vsplitterStyle) End Sub
public IG_XamOutlookBar_Properties() { InitializeComponent(); xamOutlookBar1.VerticalSplitterLocation = VerticalSplitterLocation.Right; xamOutlookBar1.VerticalSplitterResizeMode = SplitterResizeMode.Deferred; xamOutlookBar1.IsVerticalSplitterVisible = true; xamOutlookBar1.VerticalSplitterWidth = 10; Style vsplitterPreviewStyle = new Style(typeof(VerticalSplitterPreview)); vsplitterPreviewStyle.Setters.Add(new Setter(BackgroundProperty, new SolidColorBrush(Colors.Coral))); xamOutlookBar1.Resources.Add(XamOutlookBar.VerticalSplitterPreviewStyleKey, vsplitterPreviewStyle); Style vsplitterStyle = new Style(typeof(Thumb)); vsplitterStyle.Setters.Add(new Setter(BackgroundProperty, new SolidColorBrush(Colors.Chocolate))); vsplitterStyle.Setters.Add(new Setter(WidthProperty, 10.0)); xamOutlookBar1.Resources.Add(XamOutlookBar.VerticalSplitterStyleKey, vsplitterStyle); }