TextPoint, interface
Mise à jour : novembre 2007
Représente un emplacement de texte dans un document texte.
Espace de noms : EnvDTE
Assembly : EnvDTE (dans EnvDTE.dll)
Syntaxe
<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
Notes
L'objet TextPoint vous permet de trouver des emplacements dans un document. À l'aide des propriétés de l'objet TextPoint, vous pouvez rechercher du texte selon les critères suivants :
Numéros de ligne
Numéros de caractères dans une ligne
Positions absolues de caractères à partir du début du document
Colonnes d'affichage
Les objets TextPoint sont semblables aux objets EditPoint, à ceci près qu'ils opèrent sur du texte affiché dans un éditeur de code et non sur les données du tampon de texte. Le texte situé dans un document est affecté par les états de l'éditeur en général, notamment le retour à la ligne automatique et les espaces virtuels, ce qui n'est pas le cas du tampon de texte.
Lorsque vous modifiez un document, les objets TextPoint ne se déplacent pas par rapport au texte qui les entoure. Autrement dit, si du texte est inséré avant un point de texte, la valeur de la propriété AbsoluteCharOffset est incrémentée pour refléter son nouvel emplacement plus loin dans le document. Si plusieurs objets TextPoint se trouvent au même emplacement et qu'un objet EditPoint est utilisé pour insérer du texte, les nouveaux caractères viendront se placer à droite de tous les objets TextPoint, à l'exception de celui qui est utilisé pour insérer le texte.
Toute opération visant à modifier un objet TextDocument échoue si TextDocument est en lecture seule.
Exemples
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