VirtualPoint - интерфейс
Обновлен: Ноябрь 2007
Позволяет управлять текстом, находящимся за правой границей поля (левой границей в Windows с двунаправленным письмом) текстового документа.
Пространство имен: EnvDTE
Сборка: EnvDTE (в EnvDTE.dll)
Синтаксис
'Декларация
<GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")> _
Public Interface VirtualPoint _
Implements TextPoint
'Применение
Dim instance As VirtualPoint
[GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")]
public interface VirtualPoint : TextPoint
[GuidAttribute(L"42320454-626C-4DD0-9ECB-357C4F1966D8")]
public interface class VirtualPoint : TextPoint
public interface VirtualPoint extends TextPoint
Заметки
Объекты VirtualPoint похожи на объект TextPoint, с тем исключением, что они могут делать запрос о расположении виртуального пространства в документе. Объекты VirtualPoint возвращаются TextSelection.StartPoint и TextSelection.EndPoint.
Виртуальным пространством называется пустое пространство справа от существующих строк текста, в эту же область входят виртуальные точки.
Примеры
Sub VirtualPointExample()
' 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.")
MsgBox("VirtualCharOffset value: " & objActive.VirtualCharOffset & vbCr & "VirtualDisplayColumn value: " & objActive.VirtualDisplayColumn)
End Sub