TextPane2.IncrementalSearch, propriété

Fournit l'accès à la fonction de recherche incrémentielle (ISearch) de l'éditeur de texte.

Espace de noms :  EnvDTE80
Assembly :  EnvDTE80 (dans EnvDTE80.dll)

Syntaxe

'Déclaration
ReadOnly Property IncrementalSearch As IncrementalSearch
    Get
IncrementalSearch IncrementalSearch { get; }
property IncrementalSearch^ IncrementalSearch {
    IncrementalSearch^ get ();
}
abstract IncrementalSearch : IncrementalSearch
function get IncrementalSearch () : IncrementalSearch

Valeur de propriété

Type : EnvDTE80.IncrementalSearch
Objet IncrementalSearch.

Exemples

Cet exemple ouvre un document texte, crée un objet IncrementalSearch, puis recherche le caractère "t" dans le texte affiché dans le volet de texte. Pour plus d'informations sur l'exécution de cet exemple comme complément, consultez Comment : compiler et exécuter les exemples de code du modèle objet Automation.

Imports EnvDTE
Imports EnvDTE80
Public Sub OnConnection(ByVal application As Object, _
 ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, _
 ByRef custom As Array) Implements IDTExtensibility2.OnConnection
    _applicationObject = CType(application, DTE2)
    _addInInstance = CType(addInInst, AddIn)
    TextPane2IncrementalSearchExample(_applicationObject)
End Sub
Sub TextPane2IncrementalSearchExample(ByVal dte As DTE2)
    Dim objTW As TextWindow
    Dim objPane As TextPane2
    Dim objTextDoc As TextDocument
    Dim objTextPt As TextPoint
    Dim objEP As EditPoint
    Dim incSearch As IncrementalSearch
    ' Create a new text document.
    _applicationObject.ItemOperations.NewFile("General\Text File")
    ' Get a handle to the new document and create EditPoint,
    ' TextPoint, and TextPane objects.
    objTextDoc = CType(_applicationObject.ActiveDocument.Object _
     ("TextDocument"), TextDocument)
    objEP = objTextDoc.StartPoint.CreateEditPoint
    objTextPt = objTextDoc.StartPoint
    ' Plug in some text.
    objEP.Insert("A test sentence.")
    objTW = CType(dte.ActiveWindow.Object, TextWindow)
    objPane = CType(objTW.ActivePane, TextPane2)
    ' Create an incremental search object.
    incSearch = objPane.IncrementalSearch
    incSearch.StartForward()
    MsgBox("Searching for a 't'.")
    incSearch.AppendCharAndSearch(Asc("t"))
    incSearch.Exit()
End Sub

Sécurité .NET Framework

Voir aussi

Référence

TextPane2 Interface

EnvDTE80, espace de noms