Cómo: Cambiar la propiedad TextWrapping mediante programación

Actualización: noviembre 2007

Ejemplo

En el ejemplo de código siguiente se muestra cómo cambiar el valor de la propiedad TextWrapping mediante programación utilizando Microsoft Visual Basic .NET.

Se colocan cuatro botones dentro de un elemento StackPanel en Lenguaje de marcado de aplicaciones extensible (XAML). El evento Click de cada botón se corresponde con un procedimiento Sub definido en código de Microsoft Visual Basic .NET, a continuación. Después de invocar el valor TextWrapping asociado a cada evento, el objeto TextBlock identificado por la propiedad Nametxt2 se actualiza para reflejar el cambio en la propiedad.

<StackPanel Orientation="Horizontal" Margin="0,0,0,20">
  <Button Name="btn1" Background="Silver" Width="100" Click="Wrap">Wrap</Button>
  <Button Name="btn2" Background="Silver" Width="100" Click="NoWrap">NoWrap</Button>
  <Button Name="btn4" Background="Silver" Width="100" Click="WrapWithOverflow">WrapWithOverflow</Button>
</StackPanel>

<TextBlock Name="txt2" TextWrapping="Wrap" Margin="0,0,0,20" Foreground="Black">
  Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Lorem ipsum dolor sit amet, 
  consectetuer adipiscing elit.Lorem ipsum dolor sit aet, consectetuer adipiscing elit.
  Lorem ipsum dolor sit amet, consectetuer adipiscing elit.
</TextBlock>

Los eventos asociados a los clics efectuados en Button definidos anteriormente se controlan en procedimientos Sub de Microsoft Visual Basic .NET. Cada evento Click cambia el valor de la propiedad TextWrapping al valor especificado en el procedimiento y actualiza el elemento txt1 para reflejar el cambio en la propiedad.

Private Sub Wrap(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs)
    txt2.TextWrapping = System.Windows.TextWrapping.Wrap
    txt1.Text = "The TextWrap property is currently set to Wrap."
End Sub

Private Sub NoWrap(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs)
    txt2.TextWrapping = System.Windows.TextWrapping.NoWrap
    txt1.Text = "The TextWrap property is currently set to NoWrap."
End Sub

Private Sub WrapWithOverflow(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs)
    txt2.TextWrapping = System.Windows.TextWrapping.WrapWithOverflow
    txt1.Text = "The TextWrap property is currently set to WrapWithOverflow."
End Sub

private void Wrap(object sender, RoutedEventArgs e)
{
    txt2.TextWrapping = System.Windows.TextWrapping.Wrap;
    txt1.Text = "The TextWrap property is currently set to Wrap.";
}
private void NoWrap(object sender, RoutedEventArgs e)
{
    txt2.TextWrapping = System.Windows.TextWrapping.NoWrap;
    txt1.Text = "The TextWrap property is currently set to NoWrap.";
}
private void WrapWithOverflow(object sender, RoutedEventArgs e)
{
    txt2.TextWrapping = System.Windows.TextWrapping.WrapWithOverflow;
    txt1.Text = "The TextWrap property is currently set to WrapWithOverflow.";
}

Vea también

Referencia

TextWrapping

TextWrapping