Поделиться через


TextPane2.IncrementalSearch - свойство

Предоставляет доступ к функции пошагового поиска (ISearch) текстового редактора.

Пространство имен:  EnvDTE80
Сборка:  EnvDTE80 (в EnvDTE80.dll)

Синтаксис

'Декларация
ReadOnly Property IncrementalSearch As IncrementalSearch
    Get
IncrementalSearch IncrementalSearch { get; }
property IncrementalSearch^ IncrementalSearch {
    IncrementalSearch^ get ();
}
abstract IncrementalSearch : IncrementalSearch
function get IncrementalSearch () : IncrementalSearch

Значение свойства

Тип: EnvDTE80.IncrementalSearch
Объект IncrementalSearch.

Примеры

В этом примере открывается текстовый документ, создается объект IncrementalSearch, после чего осуществляется поиск символа "t" в тексте, отображенном в текстовой области. Дополнительные сведения о запуске этого примера в виде надстройки см. в разделе Практическое руководство. Компиляция и выполнение примеров кода модели объектов автоматизации.

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

Безопасность платформы .NET Framework

См. также

Ссылки

TextPane2 Интерфейс

EnvDTE80 - пространство имен