TextPattern.UnderlineStyleAttribute Campo

public: static initonly System::Windows::Automation::AutomationTextAttribute ^ UnderlineStyleAttribute;

public static readonly System.Windows.Automation.AutomationTextAttribute UnderlineStyleAttribute;

 staticval mutable UnderlineStyleAttribute : System.Windows.Automation.AutomationTextAttribute

Public Shared ReadOnly UnderlineStyleAttribute As AutomationTextAttribute 

Valor de campo

Ejemplos

En el ejemplo siguiente se muestra cómo obtener un valor de atributo para un intervalo de texto en Microsoft Bloc de notas.

private void GetUnderlineStyleAttribute()
{
    // Start application.
    Process p = Process.Start("Notepad.exe", "text.txt");

    // target --> The root AutomationElement.
    AutomationElement target = AutomationElement.FromHandle(p.MainWindowHandle);

    // Specify the control type we're looking for, in this case 'Document'
    PropertyCondition cond = new PropertyCondition(AutomationElement.ControlTypeProperty, ControlType.Document);

    AutomationElement textProvider = target.FindFirst(TreeScope.Descendants, cond);

    TextPattern textpatternPattern = textProvider.GetCurrentPattern(TextPattern.Pattern) as TextPattern;

    if (textpatternPattern == null)
    {
        Console.WriteLine("Root element does not contain a descendant that supports TextPattern.");
        return;
    }

    Object oAttribute = textpatternPattern.DocumentRange.GetAttributeValue(TextPattern.UnderlineStyleAttribute);
    if (oAttribute == TextPattern.MixedAttributeValue)
    {
        Console.WriteLine("Mixed underline styles.");
    }
    else
    {
        Console.WriteLine(oAttribute.ToString());
    }
}

Private Sub GetUnderlineStyleAttribute()
    ' Start application.
    Dim p As Process = Process.Start("Notepad.exe", "text.txt")

    ' target --> The root AutomationElement.
    Dim target As AutomationElement = AutomationElement.FromHandle(p.MainWindowHandle)

    ' Specify the control type we're looking for, in this case 'Document'
    Dim cond As PropertyCondition = New PropertyCondition(AutomationElement.ControlTypeProperty, ControlType.Document)

    Dim textProvider As AutomationElement = target.FindFirst(TreeScope.Descendants, cond)

    Dim textpatternPattern As TextPattern = CType(textProvider.GetCurrentPattern(TextPattern.Pattern), TextPattern)

    If (textpatternPattern Is Nothing) Then
        Console.WriteLine("Root element does not contain a descendant that supports TextPattern.")
        Return
    End If

    Dim oAttribute As Object = textpatternPattern.DocumentRange.GetAttributeValue(TextPattern.UnderlineStyleAttribute)
    If (oAttribute = TextPattern.MixedAttributeValue) Then
        Console.WriteLine("Mixed underline styles.")
    Else
        Console.WriteLine(oAttribute.ToString())
    End If
End Sub

Comentarios

Este identificador lo usan Automatización de la interfaz de usuario aplicaciones cliente. Automatización de la interfaz de usuario proveedores deben usar el campo equivalente en TextPatternIdentifiers.

Automatización de la interfaz de usuario clientes obtienen el valor del atributo llamando a GetAttributeValue.

Los valores de este atributo son de tipo TextDecorationLineStyle. El valor predeterminado es None.

Se aplica a

Consulte también

• TextPatternRange