TextPatternRange.Compare(TextPatternRange) Methode

Definition

Namespace:

System.Windows.Automation.Text

Assembly:

UIAutomationClient.dll

Gibt einen Boolean-Wert zurück, der angibt, ob der Textabschnitt (Start-Endpunkt bis End-Endpunkt) mit einem anderen Textabschnitt identisch ist.

public:
 bool Compare(System::Windows::Automation::Text::TextPatternRange ^ range);

public bool Compare (System.Windows.Automation.Text.TextPatternRange range);

member this.Compare : System.Windows.Automation.Text.TextPatternRange -> bool

Public Function Compare (range As TextPatternRange) As Boolean

Parameter

range

TextPatternRange

Ein Textbereich für den Vergleich.

Gibt zurück

Boolean

true, wenn beide Textabschnitte identisch sind, andernfalls false.

Ausnahmen

ArgumentException

Wenn der zu vergleichende Bereich nicht vom gleichen Textanbieter stammt.

Beispiele

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

    // target --> The root AutomationElement.
    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 false;
    }
    TextPatternRange[] currentSelection = textpatternPattern.GetSelection();
    TextPatternRange[] currentVisibleRanges = textpatternPattern.GetVisibleRanges();
    return currentSelection[0].Compare(currentVisibleRanges[0]);
}

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

    ' target --> The root AutomationElement.
    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 Nothing
    End If
    Dim currentSelection As TextPatternRange() = textpatternPattern.GetSelection()
    Dim currentVisibleRange As TextPatternRange() = textpatternPattern.GetVisibleRanges()
    Return currentSelection(0).Compare(currentVisibleRange(0))
End Function

Siehe auch

• TextPatternRangeEndpoint