TextPattern.CapStyleAttribute Veld

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

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

 staticval mutable CapStyleAttribute : System.Windows.Automation.AutomationTextAttribute

Public Shared ReadOnly CapStyleAttribute As AutomationTextAttribute 

Waarde van veld

Voorbeelden

In het volgende voorbeeld ziet u hoe u een kenmerkwaarde kunt verkrijgen voor een tekstbereik in Microsoft Kladblok.

private void GetCapStyleAttribute()
{
    // 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.CapStyleAttribute);
    if (oAttribute == TextPattern.MixedAttributeValue)
    {
        Console.WriteLine("Mixed cap styles.");
    }
    else
    {
        Console.WriteLine(oAttribute.ToString());
    }
}

Private Sub GetCapStyleAttribute()
    ' 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.CapStyleAttribute)
    If (oAttribute = TextPattern.MixedAttributeValue) Then
        Console.WriteLine("Mixed cap styles.")
    Else
        Console.WriteLine(oAttribute.ToString())
    End If
End Sub

Opmerkingen

Deze id wordt gebruikt door UI Automation clienttoepassingen. UI Automation providers moeten het equivalente veld in TextPatternIdentifiers gebruiken.

UI Automation clients krijgen de waarde van het kenmerk door GetAttributeValue aan te roepen.

Waarden voor dit kenmerk zijn van het type CapStyle. De standaardwaarde is None.

Zie ook

• TextPatternRange
• CapitalsProperty