TextPoint 介面
更新:2007 年 11 月
代表文字文件中的文字位置。
命名空間: EnvDTE
組件: EnvDTE (在 EnvDTE.dll 中)
語法
<GuidAttribute("7F59E94E-4939-40D2-9F7F-B7651C25905D")> _
Public Interface TextPoint
Dim instance As TextPoint
[GuidAttribute("7F59E94E-4939-40D2-9F7F-B7651C25905D")]
public interface TextPoint
[GuidAttribute(L"7F59E94E-4939-40D2-9F7F-B7651C25905D")]
public interface class TextPoint
public interface TextPoint
備註
TextPoint 物件可讓您在文件中尋找位置。您可以使用 TextPoint 物件的屬性以下列項目尋找文字:
行號
一行中的字元數
從文件開頭起算的絕對字元位置
顯示資料行
TextPoint 物件與 EditPoint 物件相似,不過,前者適用於以程式碼編輯器顯示的文字,後者則適用於文字緩衝區內的資料。文件裡的文字會受全域編輯器狀態 (例如自動換行和虛擬空間) 影響,文字緩衝區則不受影響。
當您編輯文件時,TextPoint 物件不會隨周圍的文字移動。也就是說,如果在文字位置之前插入文字,文字位置的 AbsoluteCharOffset 屬性值會遞增,以反應文字位置下移後在文件中的新位置。如果多個 TextPoint 物件位於相同的位置,而且使用一個 EditPoint 物件插入新文字,則新字元會位於所有 TextPoint 物件 (插入文字所使用的那一個物件除外) 的右邊。
如果 TextDocument 是唯讀物件,任何嘗試修改 TextDocument 的作業都會失敗。
範例
Sub TextPointExample()
' Comments a region of code.
Dim selection As TextSelection
selection = dte.ActiveDocument.selection()
Dim Start As Editpoint
Start = selection.TopPoint.CreateEditPoint()
Dim endpt As TextPointendpt = selection.BottomPoint
Dim undoObj As UndoContext = dte.UndoContext
undoobj.Open("Comment Region")
Do While (Start.LessThan(endpt))
Start.Insert("//")
Start.LineDown()
Start.StartOfLine()
Loop
undoobj.Close()
End Sub