共用方式為

TextSelection.AnchorPoint 屬性

  • 發行項

取得選取範圍的原點。

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

語法

'宣告
ReadOnly Property AnchorPoint As VirtualPoint

VirtualPoint AnchorPoint { get; }

property VirtualPoint^ AnchorPoint {
    VirtualPoint^ get ();
}

abstract AnchorPoint : VirtualPoint with get

function get AnchorPoint () : VirtualPoint

屬性值

類型：EnvDTE.VirtualPoint
VirtualPoint 物件。

備註

雖然 TextPoint 物件表示文字選取範圍的位置會在 [編輯器] 視窗中，它們不表示緩衝區的位置。 虛擬空間 (在行結尾之外的區域) 也只能在 [編輯器] 視窗中追蹤。 因此，，當您在文字緩衝區使用 EditPoint 修改文字時，發生在文字選取範圍不會定義。 例如命令可能開始文字選取範圍，取得編輯點，然後變更緩衝區。 若要確保文字選取範圍在特定位置，您必須在該位置明確放置文字選取範圍中的命令關閉時。

範例

Sub AnchorPointExample()
    ' Before running this example, open a text document.
    Dim objSel As TextSelection = DTE.ActiveDocument.Selection
    Dim objAnchor As VirtualPoint = objSel.AnchorPoint
    ' objAnchor is "live", tied to the position of the actual selection, 
    ' so it will reflect any changes. iCol and iRow are created here to 
    ' save a "snapshot" of the anchor point's position at this time.
    Dim iCol As Long = objAnchor.DisplayColumn
    Dim iRow As Long = objAnchor.Line
    ' As the selection is extended, the active point moves but the anchor 
    ' point remains in place.
    objSel.StartOfDocument(True)
    objSel.EndOfDocument(True)

    If (iCol = objAnchor.DisplayColumn And iRow = objAnchor.Line) Then
        MsgBox("The anchor point has remained in place at row " & iRow & ", display column " & iCol)
    End If
End Sub

.NET Framework 安全性

請參閱

參考

TextSelection 介面

EnvDTE 命名空間