共用方式為


VirtualPoint 介面

可讓您管理超過文字文件右邊界的文字,在雙向 (Bidirectional) Windows 中則為左邊界。

命名空間:  EnvDTE
組件:  EnvDTE (在 EnvDTE.dll 中)

語法

'宣告
<GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")> _
Public Interface VirtualPoint _
    Inherits TextPoint
[GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")]
public interface VirtualPoint : TextPoint
[GuidAttribute(L"42320454-626C-4DD0-9ECB-357C4F1966D8")]
public interface class VirtualPoint : TextPoint
[<GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")>]
type VirtualPoint =  
    interface 
        interface TextPoint 
    end
public interface VirtualPoint extends TextPoint

VirtualPoint 類型會公開下列成員。

屬性

  名稱 描述
公用屬性 AbsoluteCharOffset 取得從文件開頭到物件的字元位移 (Offset),以 1 為基底。
公用屬性 AtEndOfDocument 如果物件是在文件的結尾,則傳回 true。
公用屬性 AtEndOfLine 如果物件是在一行的結尾,則傳回 true。
公用屬性 AtStartOfDocument 如果物件是在文件的開頭,則傳回 true。
公用屬性 AtStartOfLine 如果物件是在一行的開頭,則傳回 true。
公用屬性 CodeElement 傳回在 VirtualPoint 位置的程式碼項目。
公用屬性 DisplayColumn 取得包含物件的目前顯示資料行數目。
公用屬性 DTE 取得最上層的擴充性物件。
公用屬性 Line 取得物件的行號。
公用屬性 LineCharOffset 取得物件的字元位移。
公用屬性 LineLength 傳回一個包含物件的行之字元數,不包含換行字元。
公用屬性 Parent 取得 VirtualPoint 物件的直屬父物件。
公用屬性 VirtualCharOffset 取得虛擬空間中之虛擬點的資料行索引。
公用屬性 VirtualDisplayColumn 取得目前位置的顯示資料行。

回頁首

方法

  名稱 描述
公用方法 CreateEditPoint 在進行呼叫之物件的所在位置建立並傳回 EditPoint 物件。
公用方法 EqualTo 傳回指定 TextPoint 物件的 AbsoluteCharOffset 屬性值是否與進行呼叫的 VirtualPoint 物件的該屬性值相同。
公用方法 GreaterThan 傳回是否呼叫物件的 AbsoluteCharOffset 屬性值大於指定點物件的屬性值。
公用方法 LessThan 傳回是否呼叫物件的 AbsoluteCharOffset 屬性值小於指定物件的屬性值。
公用方法 TryToShow 嘗試顯示文字點的位置。

回頁首

備註

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

請參閱

參考

EnvDTE 命名空間