TextPatternRange.GetEnclosingElement Método
Definição
Importante
Algumas informações dizem respeito a um produto pré-lançado que pode ser substancialmente modificado antes de ser lançado. A Microsoft não faz garantias, de forma expressa ou implícita, em relação à informação aqui apresentada.
Devolve o mais AutomationElement interno que envolve o intervalo de texto.
public:
System::Windows::Automation::AutomationElement ^ GetEnclosingElement();
public System.Windows.Automation.AutomationElement GetEnclosingElement();
member this.GetEnclosingElement : unit -> System.Windows.Automation.AutomationElement
Public Function GetEnclosingElement () As AutomationElement
Devoluções
O elemento mais interno que envolve o chamador.
Exemplos
private AutomationElement EnclosingElementFromSelection(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 null;
}
TextPatternRange[] currentSelection = textpatternPattern.GetSelection();
return currentSelection[0].GetEnclosingElement();
}
Private Function EnclosingElementFromSelection(ByVal target As AutomationElement) As AutomationElement
' 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()
Return currentSelection(0).GetEnclosingElement()
End Function
Observações
O anexo AutomationElement, normalmente o fornecedor de texto que fornece o intervalo de texto. No entanto, se o fornecedor de texto suportar elementos filhos como tabelas ou hiperligações, então o elemento anexo pode ser um descendente do fornecedor de texto.