TextSelection.ActivePoint (Propiedad)

Actualización: noviembre 2007

Obtiene el extremo actual de la selección.

Espacio de nombres:  EnvDTE
Ensamblado:  EnvDTE (en EnvDTE.dll)

Sintaxis

ReadOnly Property ActivePoint As VirtualPoint

Dim instance As TextSelection
Dim value As VirtualPoint

value = instance.ActivePoint
VirtualPoint ActivePoint { get; }
property VirtualPoint^ ActivePoint {
    VirtualPoint^ get ();
}
function get ActivePoint () : VirtualPoint

Valor de propiedad

Tipo: EnvDTE.VirtualPoint

Un objeto VirtualPoint.

Comentarios

Aunque los objetos TextPoint indican la ubicación del texto seleccionado en la ventana Editor, no marcan la ubicación en el búfer. El espacio virtual (el área situada más allá del final de la línea) se controla también solamente en la ventana Editor. Por tanto, cuando utiliza un objeto EditPoint en el búfer de texto para modificar texto, no se define el texto seleccionado. Por ejemplo, un comando se puede iniciar con texto seleccionado, obtener puntos de edición y, a continuación, cambiar el búfer. Para garantizar que el texto seleccionado está en una ubicación determinada, debe colocar explícitamente el texto seleccionado en esa ubicación al final de su comando.

Ejemplos

Sub ActivePointExample()
   ' Before running this example, open a text document.
   Dim objSel As TextSelection = DTE.ActiveDocument.Selection
   Dim objActive As VirtualPoint = objSel.ActivePoint
   ' Collapse the selection to the beginning of the line.
   objSel.StartOfLine()
   ' objActive is "live", tied to the position of the actual selection, 
   ' so it will reflect the new position.
   Dim iCol As Long = objActive.DisplayColumn
   ' Move the selection to the end of the line.
   objSel.EndOfLine()

   MsgBox("The length of the insertion point line is " & (objActive.DisplayColumn - iCol) & " display characters.")
End Sub

Permisos

Vea también

Referencia

TextSelection (Interfaz)

TextSelection (Miembros)

EnvDTE (Espacio de nombres)