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

Статья
11/05/2008

Обновлен: Ноябрь 2007

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

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

Синтаксис

'Декларация
ReadOnly Property IncrementalSearch As IncrementalSearch
'Применение
Dim instance As TextPane2
Dim value As IncrementalSearch

value = instance.IncrementalSearch

IncrementalSearch IncrementalSearch { get; }

property IncrementalSearch^ IncrementalSearch {
    IncrementalSearch^ get ();
}

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

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

TextPane2 Интерфейс

TextPane2 - члены

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

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