TextPatternRange.ExpandToEnclosingUnit(TextUnit) Método

public:
 void ExpandToEnclosingUnit(System::Windows::Automation::Text::TextUnit unit);

public void ExpandToEnclosingUnit(System.Windows.Automation.Text.TextUnit unit);

member this.ExpandToEnclosingUnit : System.Windows.Automation.Text.TextUnit -> unit

Public Sub ExpandToEnclosingUnit (unit As TextUnit)

Parámetros

Ejemplos

 private void ExpandSelection(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;
    }
    TextPatternRange[] currentSelection = textpatternPattern.GetSelection();
    // Expand selection to include entire document
    currentSelection[0].ExpandToEnclosingUnit(TextUnit.Document);
}

Private Sub ExpandSelection(ByVal target 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
    End If
    Dim currentSelection As TextPatternRange() = textpatternPattern.GetSelection()
    currentSelection(0).ExpandToEnclosingUnit(TextUnit.Document)
End Sub

Comentarios

Si el intervalo ya es una cantidad exacta de las unidades especificadas, permanece sin cambios.

Para que el ExpandToEnclosingUnit método se ejecute correctamente, se realiza una secuencia de acciones en segundo plano.

1. El intervalo de texto se normaliza; es decir, el intervalo de texto se contrae a un intervalo degenerado en el Start punto de conexión, lo que hace que el End punto de conexión sea superfluo. Este paso es necesario para quitar la ambigüedad en situaciones en las que un intervalo de texto abarca los límites unit ; por ejemplo, "{The U}RL https://www.microsoft.com/ is embedded in text" donde "{" y "}" son los puntos de conexión del intervalo de texto.

2. El intervalo resultante se desplaza hacia atrás en el DocumentRange hasta el principio del límite solicitado unit.

3. El intervalo resultante se mueve hacia delante o hacia atrás en DocumentRange , en función del número solicitado de límites unit .

4. A continuación, el intervalo se expande desde un estado de intervalo degenerado moviendo el extremo End en función de un límite unit solicitado.

Ejemplos de cómo se ajusta un intervalo de texto para Move() y ExpandToEnclosingUnit()

ExpandToEnclosingUnit respeta el texto oculto y visible. El cliente Automatización de la interfaz de usuario puede comprobar el IsHiddenAttribute para ver la visibilidad del texto.

ExpandToEnclosingUnit se aplaza a la siguiente mayor TextUnit compatibilidad si el control no admite el elemento especificado TextUnit .

El orden, de la unidad más pequeña a la más grande, se muestra a continuación.

• Character

• Format

• Word

• Line

• Paragraph

• Page

• Document

Consulte también

• TextPatternRangeEndpoint