WPF:如何在vb代码中绑定位于controlTemplate中的gradientstop的color属性?

时间:2009-08-05 16:57:27

标签: wpf vb.net data-binding templates gradientstop

我需要这样做才能为自定义控件创建动态背景画笔(继承ContentControl)。我的自定义控件有两个依赖项属性:StartColor和EndColor。在自定义控件的控件模板中,控件包含在边框中,背景为RadialGradientBrush,具有渐变停止。一个渐变停止的颜色绑定到StartColor,另一个绑定到EndColor。我在XAML中有这个工作,但我需要将它转换为VB代码。 XAML中控件模板的border元素使用以下代码完成:

<Style x:Key="{x:Type wpf:MyControl}" 
   TargetType="{x:Type wpf:MyControl}" 
   BasedOn="{StaticResource {x:Type ContentControl}}">
    <Style.Setters>
        <Setter Property="Template">
            <Setter.Value>
                <ControlTemplate TargetType="{x:Type wpf:MyControl}">

                      ...

                    <Border HorizontalAlignment="Stretch" 
                            x:Name="background" Width="Auto"
                            Grid.RowSpan="3" 
                            Opacity="0.9" 
                            CornerRadius="{TemplateBinding CornerRadius}">
                                <Border.Background>
                                    <Custom:RadialGradientBrush>
                                        <Custom:GradientStop Color="{Binding Path=EndColor, 
                                                            RelativeSource={RelativeSource TemplatedParent}, 
                                                            Mode=OneWay}" 
                                                            Offset="0.462"/>
                                        <Custom:GradientStop Color="{Binding StartColor, 
                                                            RelativeSource={RelativeSource TemplatedParent}, 
                                                            Mode=OneWay}" 
                                                            Offset="1"/>
                                    </Custom:RadialGradientBrush>
                                </Border.Background>
                            </Border>

                        ...

                </ControlTemplate>
            </Setter.Value>
        </Setter>
    </Style.Setters>
</Style>

我尝试在VB代码中创建边框,如下所示,但它不起作用:

...
Dim backgroundBorder As New FrameworkElementFactory(GetType(Border))
        With backgroundBorder
            .Name = "background"
            .SetValue(Grid.RowSpanProperty, 3)
            .SetValue(Grid.OpacityProperty, 0.9)
            .SetBinding(Border.CornerRadiusProperty, New Binding("CornerRadius") With {.RelativeSource = New RelativeSource(RelativeSourceMode.TemplatedParent)})
        End With

        Dim backgroundBrush As New RadialGradientBrush()

        Dim startColorGradientStop As New GradientStop()
        startColorGradientStop.Offset = 1.0
        BindingOperations.SetBinding(startColorGradientStop, GradientStop.ColorProperty, New Binding("StartColor") With {.RelativeSource = New RelativeSource(RelativeSourceMode.TemplatedParent), .Mode = BindingMode.OneWay})
        backgroundBrush.GradientStops.Add(startColorGradientStop)

        Dim endColorGradientStop As New GradientStop()
        endColorGradientStop.Offset = 0.462
        BindingOperations.SetBinding(endColorGradientStop, GradientStop.ColorProperty, New Binding("EndColor") With {.RelativeSource = New RelativeSource(RelativeSourceMode.TemplatedParent), .Mode = BindingMode.OneWay})
        backgroundBrush.GradientStops.Add(endColorGradientStop)

backgroundBorder.SetValue(Border.BackgroundProperty, backgroundBrush)
...



有关如何在VB代码中完成此任务的任何想法?

2 个答案:

答案 0 :(得分:1)

根据MS的说法,你知道不再推荐使用FrameworkElementFactory方法吗?建议的方法是使用XamlReader.Parse在代码中创建任何元素/资源。

答案 1 :(得分:0)

您必须访问Border ContentControl作为内容的Parent ContentControl。并在VB代码中设置它。

我在ContentControl中的意思是无论哪个控件都是Border的父级,您需要在OnApplyTemplate覆盖函数上访问它,并将VB.NET创建的边框作为子视图添加到该视觉中。