Exemplarische Vorgehensweise: Text markieren

Sie können verschiedene visuelle Effekte hinzufügen, indem Sie im Editor Komponenten des Managed Extensibility Framework (MEF) erstellen. In dieser exemplarischen Vorgehensweise wird veranschaulicht, wie jedes Vorkommen des aktuellen Worts in einer Textdatei hervorhebt. Wenn ein Wort mehr als einmal in einer Textdatei auftritt und Sie die Einfügemarke in einem Vorkommen positionieren, wird jedes Vorkommen hervorgehoben.

Vorbereitungsmaßnahmen

Zum Abschließen dieser exemplarischen Vorgehensweise müssen Sie Visual Studio 2010 SDKinstallieren.

Hinweis

Weitere Informationen über das Visual Studio-SDK finden Sie unter Erweitern von Visual Studio Overview.Um herauszufinden finden Sie unter wie das Visual Studio-SDK, auf Visual Studio Extensibility Developer Center der MSDN-Website herunterlädt.

Ein MEF-Projekt erstellen

So erstellen Sie ein MEF-Projekt

1. Erstellen Sie ein Projekt Editor-Klassifizierungs. Geben Sie der Projektmappe HighlightWordTest.

2. Öffnen Sie die Datei source.extension.vsixmanifest im VSIX-Manifest-Editor.

3. Überprüfen Sie, ob die Content Überschrift einen MEF-Komponenten-Inhaltstyp enthält und dass Path zu HighlightWordTest.dll festgelegt ist.

4. Speichern und schließen Sie source.extension.vsixmanifest.

5. Löschen Sie die vorhandenen Klassendateien.

Ein TextMarkerTag definieren

Der erste Schritt besteht darin, TextMarkerTag Hervorhebung im Text unterzuordnen und ihre Darstellung zu definieren.

So fügen Sie ein TextMarkerTag und ein MarkerFormatDefinition definieren

1. Fügen Sie eine Klassendatei hinzu, und nennen Sie sie HighlightWordTag.

2. Importieren Sie die folgenden Namespaces.

   Imports System
   Imports System.Collections.Generic
   Imports System.ComponentModel.Composition
   Imports System.Linq
   Imports System.Threading
   Imports System.Windows.Media
   Imports Microsoft.VisualStudio.Text
   Imports Microsoft.VisualStudio.Text.Classification
   Imports Microsoft.VisualStudio.Text.Editor
   Imports Microsoft.VisualStudio.Text.Operations
   Imports Microsoft.VisualStudio.Text.Tagging
   Imports Microsoft.VisualStudio.Utilities
   

   using System;
   using System.Collections.Generic;
   using System.ComponentModel.Composition;
   using System.Linq;
   using System.Threading;
   using System.Windows.Media;
   using Microsoft.VisualStudio.Text;
   using Microsoft.VisualStudio.Text.Classification;
   using Microsoft.VisualStudio.Text.Editor;
   using Microsoft.VisualStudio.Text.Operations;
   using Microsoft.VisualStudio.Text.Tagging;
   using Microsoft.VisualStudio.Utilities;
   

3. Erstellen Sie eine Klasse, die von TextMarkerTag erbt, und nennen Sie diese HighlightWordTag.

   Friend Class HighlightWordTag
       Inherits TextMarkerTag
   

   internal class HighlightWordTag : TextMarkerTag
   

4. Erstellen Sie eine zweite Klasse, die von MarkerFormatDefinitionerbt, und nennen Sie sie HighlightWordFormatDefinition. Zum Ausführen dieser Formatdefinition für das Tag zu verwenden, müssen Sie diese mit den folgenden Attributen exportieren:

   • NameAttribute: Tags verwenden dies, um diesen Stil verweisen

   • UserVisibleAttribute: Dies bewirkt, dass das Format, in der Benutzeroberfläche angezeigt werden

   <Export(GetType(EditorFormatDefinition))>
   <Name("MarkerFormatDefinition/HighlightWordFormatDefinition")>
   <UserVisible(True)>
   Friend Class HighlightWordFormatDefinition
       Inherits MarkerFormatDefinition
   

   [Export(typeof(EditorFormatDefinition))]
   [Name("MarkerFormatDefinition/HighlightWordFormatDefinition")]
   [UserVisible(true)]
   internal class HighlightWordFormatDefinition : MarkerFormatDefinition
   

5. Im Konstruktor für HighlightWordFormatDefinition, definieren Sie ihren Anzeigenamen und Darstellung. Die Background-Eigenschaft definiert die Füllfarbe, während die Eigenschaft Vordergrund die Rahmenfarbe definiert.

   Public Sub New()
       Me.BackgroundColor = Colors.LightBlue
       Me.ForegroundColor = Colors.DarkBlue
       Me.DisplayName = "Highlight Word" 
       Me.ZOrder = 5
   End Sub
   

   public HighlightWordFormatDefinition()
   {
       this.BackgroundColor = Colors.LightBlue;
       this.ForegroundColor = Colors.DarkBlue;
       this.DisplayName = "Highlight Word";
       this.ZOrder = 5;
   }
   

6. Im Konstruktor für HighlightWordTag, übergeben Sie den Namen der Formatdefinition, die Sie gerade erstellt haben.

   Public Sub New()
       MyBase.New("MarkerFormatDefinition/HighlightWordFormatDefinition")
   End Sub
   

   public HighlightWordTag() : base("MarkerFormatDefinition/HighlightWordFormatDefinition") { }
   

Ein ITagger implementieren

Der nächste Schritt besteht darin, die ITagger-Schnittstelle zu implementieren. Diese Schnittstelle weist auf einen angegebenen Textpuffer, Tage, die Text-Hervorhebung und andere visuelle Effekte erzeugen.

So implementieren Sie einen Tagger

1. Erstellen Sie eine Klasse, die ITagger des Typs HighlightWordTagimplementiert, und nennen Sie sie HighlightWordTagger.

   Friend Class HighlightWordTagger
       Implements ITagger(Of HighlightWordTag)
   

   internal class HighlightWordTagger : ITagger<HighlightWordTag>
   

2. Fügen Sie die folgenden privaten Felder und Eigenschaften der Klasse hinzu:

   • ITextView, das der aktuellen Textansicht entspricht.

   • ITextBuffer, das in den Textpuffer entspricht, der die Textansicht zugrunde liegt.

   • ITextSearchService, das verwendet wird, um Text zu suchen.

   • ITextStructureNavigator, das Methoden zum Navigieren in der Textabschnitte verfügt.

   • NormalizedSnapshotSpanCollection, das den Satz von Wörtern, um hervorzuheben.

   • SnapshotSpan, das auf das aktuelle Wort entspricht.

   • SnapshotPoint, das der aktuellen Position der Einfügemarke entspricht.

   • Ein Sperren Objekt.

   Private _View As ITextView
   Private Property View() As ITextView
       Get 
           Return _View
       End Get 
       Set(ByVal value As ITextView)
           _View = value
       End Set 
   End Property 
   Private _SourceBuffer As ITextBuffer
   Private Property SourceBuffer() As ITextBuffer
       Get 
           Return _SourceBuffer
       End Get 
       Set(ByVal value As ITextBuffer)
           _SourceBuffer = value
       End Set 
   End Property 
   Private _TextSearchService As ITextSearchService
   Private Property TextSearchService() As ITextSearchService
       Get 
           Return _TextSearchService
       End Get 
       Set(ByVal value As ITextSearchService)
           _TextSearchService = value
       End Set 
   End Property 
   Private _TextStructureNavigator As ITextStructureNavigator
   Private Property TextStructureNavigator() As ITextStructureNavigator
       Get 
           Return _TextStructureNavigator
       End Get 
       Set(ByVal value As ITextStructureNavigator)
           _TextStructureNavigator = value
       End Set 
   End Property 
   Private _WordSpans As NormalizedSnapshotSpanCollection
   Private Property WordSpans() As NormalizedSnapshotSpanCollection
       Get 
           Return _WordSpans
       End Get 
       Set(ByVal value As NormalizedSnapshotSpanCollection)
           _WordSpans = value
       End Set 
   End Property 
   Private _CurrentWord As System.Nullable(Of SnapshotSpan)
   Private Property CurrentWord() As System.Nullable(Of SnapshotSpan)
       Get 
           Return _CurrentWord
       End Get 
       Set(ByVal value As System.Nullable(Of SnapshotSpan))
           _CurrentWord = value
       End Set 
   End Property 
   Private _RequestedPoint As SnapshotPoint
   Private Property RequestedPoint() As SnapshotPoint
       Get 
           Return _RequestedPoint
       End Get 
       Set(ByVal value As SnapshotPoint)
           _RequestedPoint = value
       End Set 
   End Property 
   Private updateLock As New Object()
   

   ITextView View { get; set; }
   ITextBuffer SourceBuffer { get; set; }
   ITextSearchService TextSearchService { get; set; }
   ITextStructureNavigator TextStructureNavigator { get; set; }
   NormalizedSnapshotSpanCollection WordSpans { get; set; }
   SnapshotSpan? CurrentWord { get; set; }
   SnapshotPoint RequestedPoint { get; set; }
   object updateLock = new object();
   

3. Fügen Sie einen Konstruktor hinzu, mit dem die Eigenschaft initialisiert, die weiter oben aufgeführten LayoutChanged und PositionChanged und Ereignishandler hinzufügt.

   Public Sub New(ByVal view As ITextView, ByVal sourceBuffer As ITextBuffer, ByVal textSearchService As ITextSearchService, ByVal textStructureNavigator As ITextStructureNavigator)
       Me.View = view
       Me.SourceBuffer = sourceBuffer
       Me.TextSearchService = textSearchService
       Me.TextStructureNavigator = textStructureNavigator
       Me.WordSpans = New NormalizedSnapshotSpanCollection()
       Me.CurrentWord = Nothing 
       AddHandler Me.View.Caret.PositionChanged, AddressOf CaretPositionChanged
       AddHandler Me.View.LayoutChanged, AddressOf ViewLayoutChanged
   End Sub
   

   public HighlightWordTagger(ITextView view, ITextBuffer sourceBuffer, ITextSearchService textSearchService,
   ITextStructureNavigator textStructureNavigator)
   {
       this.View = view;
       this.SourceBuffer = sourceBuffer;
       this.TextSearchService = textSearchService;
       this.TextStructureNavigator = textStructureNavigator;
       this.WordSpans = new NormalizedSnapshotSpanCollection();
       this.CurrentWord = null;
       this.View.Caret.PositionChanged += CaretPositionChanged;
       this.View.LayoutChanged += ViewLayoutChanged;
   }
   

4. Die Ereignishandler beide rufen die UpdateAtCaretPosition-Methode auf.

   Private Sub ViewLayoutChanged(ByVal sender As Object, ByVal e As TextViewLayoutChangedEventArgs)
       ' If a new snapshot wasn't generated, then skip this layout 
       If e.NewSnapshot IsNot e.OldSnapshot Then
           UpdateAtCaretPosition(View.Caret.Position)
       End If 
   End Sub 
   
   Private Sub CaretPositionChanged(ByVal sender As Object, ByVal e As CaretPositionChangedEventArgs)
       UpdateAtCaretPosition(e.NewPosition)
   End Sub
   

   void ViewLayoutChanged(object sender, TextViewLayoutChangedEventArgs e)
   {
       // If a new snapshot wasn't generated, then skip this layout 
       if (e.NewSnapshot != e.OldSnapshot)
       {
           UpdateAtCaretPosition(View.Caret.Position);
       }
   }
   
   void CaretPositionChanged(object sender, CaretPositionChangedEventArgs e)
   {
       UpdateAtCaretPosition(e.NewPosition);
   }
   

5. Sie müssen ein TagsChanged-Ereignis hinzufügen, die von der Update-Methode aufgerufen wird.

   Public Event TagsChanged(ByVal sender As Object, ByVal e As SnapshotSpanEventArgs) _
       Implements ITagger(Of HighlightWordTag).TagsChanged
   

   public event EventHandler<SnapshotSpanEventArgs> TagsChanged;
   

6. Die UpdateAtCaretPosition()-Methode durchsucht alle Wörter im Textpuffer, der dem Wort identisch ist, in der der Cursor positioniert und eine Liste von SnapshotSpan-Objekten erstellt wird, die den Vorkommen des Worts entsprechen. Anschließend wird SynchronousUpdatean, die das TagsChanged-Ereignis auslöst.

   Private Sub UpdateAtCaretPosition(ByVal caretPosition As CaretPosition)
       Dim point As System.Nullable(Of SnapshotPoint) = caretPosition.Point.GetPoint(SourceBuffer, caretPosition.Affinity)
   
       If Not point.HasValue Then 
           Exit Sub 
       End If 
   
       ' If the new caret position is still within the current word (and on the same snapshot), we don't need to check it 
       If CurrentWord.HasValue AndAlso CurrentWord.Value.Snapshot Is View.TextSnapshot AndAlso point.Value > CurrentWord.Value.Start AndAlso point.Value < CurrentWord.Value.[End] Then 
           Exit Sub 
       End If
   
       RequestedPoint = point.Value
       UpdateWordAdornments()
   End Sub 
   
   Private Sub UpdateWordAdornments()
       Dim currentRequest As SnapshotPoint = RequestedPoint
       Dim wordSpans As New List(Of SnapshotSpan)()
       'Find all words in the buffer like the one the caret is on 
       Dim word As TextExtent = TextStructureNavigator.GetExtentOfWord(currentRequest)
       Dim foundWord As Boolean = True 
       'If we've selected something not worth highlighting, we might have missed a "word" by a little bit 
       If Not WordExtentIsValid(currentRequest, word) Then 
           'Before we retry, make sure it is worthwhile 
           If word.Span.Start <> currentRequest OrElse currentRequest = currentRequest.GetContainingLine().Start OrElse Char.IsWhiteSpace((currentRequest - 1).GetChar()) Then
               foundWord = False 
           Else 
               ' Try again, one character previous.  
               'If the caret is at the end of a word, pick up the word.
               word = TextStructureNavigator.GetExtentOfWord(currentRequest - 1)
   
               'If the word still isn't valid, we're done 
               If Not WordExtentIsValid(currentRequest, word) Then
                   foundWord = False 
               End If 
           End If 
       End If 
   
       If Not foundWord Then 
           'If we couldn't find a word, clear out the existing markers
           SynchronousUpdate(currentRequest, New NormalizedSnapshotSpanCollection(), Nothing)
           Exit Sub 
       End If 
   
       Dim currentWord__1 As SnapshotSpan = word.Span
       'If this is the current word, and the caret moved within a word, we're done. 
       If CurrentWord.HasValue AndAlso currentWord__1 = CurrentWord Then 
           Exit Sub 
       End If 
   
       'Find the new spans 
       Dim findData As New FindData(currentWord__1.GetText(), currentWord__1.Snapshot)
       findData.FindOptions = FindOptions.WholeWord Or FindOptions.MatchCase
   
       wordSpans.AddRange(TextSearchService.FindAll(findData))
   
       'If another change hasn't happened, do a real update 
       If currentRequest = RequestedPoint Then
           SynchronousUpdate(currentRequest, New NormalizedSnapshotSpanCollection(wordSpans), currentWord__1)
       End If 
   End Sub 
   Private Shared Function WordExtentIsValid(ByVal currentRequest As SnapshotPoint, ByVal word As TextExtent) As Boolean 
       Return word.IsSignificant AndAlso currentRequest.Snapshot.GetText(word.Span).Any(Function(c) Char.IsLetter(c))
   End Function
   

   void UpdateAtCaretPosition(CaretPosition caretPosition)
   {
       SnapshotPoint? point = caretPosition.Point.GetPoint(SourceBuffer, caretPosition.Affinity);
   
       if (!point.HasValue)
           return;
   
       // If the new caret position is still within the current word (and on the same snapshot), we don't need to check it 
       if (CurrentWord.HasValue
           && CurrentWord.Value.Snapshot == View.TextSnapshot
           && point.Value >= CurrentWord.Value.Start
           && point.Value <= CurrentWord.Value.End)
       {
           return;
       }
   
       RequestedPoint = point.Value;
       UpdateWordAdornments();
   }
   
   void UpdateWordAdornments()
   {
       SnapshotPoint currentRequest = RequestedPoint;
       List<SnapshotSpan> wordSpans = new List<SnapshotSpan>();
       //Find all words in the buffer like the one the caret is on
       TextExtent word = TextStructureNavigator.GetExtentOfWord(currentRequest);
       bool foundWord = true;
       //If we've selected something not worth highlighting, we might have missed a "word" by a little bit
       if (!WordExtentIsValid(currentRequest, word))
       {
           //Before we retry, make sure it is worthwhile 
           if (word.Span.Start != currentRequest
                || currentRequest == currentRequest.GetContainingLine().Start
                || char.IsWhiteSpace((currentRequest - 1).GetChar()))
           {
               foundWord = false;
           }
           else
           {
               // Try again, one character previous.  
               //If the caret is at the end of a word, pick up the word.
               word = TextStructureNavigator.GetExtentOfWord(currentRequest - 1);
   
               //If the word still isn't valid, we're done 
               if (!WordExtentIsValid(currentRequest, word))
                   foundWord = false;
           }
       }
   
       if (!foundWord)
       {
           //If we couldn't find a word, clear out the existing markers
           SynchronousUpdate(currentRequest, new NormalizedSnapshotSpanCollection(), null);
           return;
       }
   
       SnapshotSpan currentWord = word.Span;
       //If this is the current word, and the caret moved within a word, we're done. 
       if (CurrentWord.HasValue && currentWord == CurrentWord)
           return;
   
       //Find the new spans
       FindData findData = new FindData(currentWord.GetText(), currentWord.Snapshot);
       findData.FindOptions = FindOptions.WholeWord | FindOptions.MatchCase;
   
       wordSpans.AddRange(TextSearchService.FindAll(findData));
   
       //If another change hasn't happened, do a real update 
       if (currentRequest == RequestedPoint)
           SynchronousUpdate(currentRequest, new NormalizedSnapshotSpanCollection(wordSpans), currentWord);
   }
   static bool WordExtentIsValid(SnapshotPoint currentRequest, TextExtent word)
   {
       return word.IsSignificant
           && currentRequest.Snapshot.GetText(word.Span).Any(c => char.IsLetter(c));
   }
   

7. SynchronousUpdate führt eine synchrone Aktualisierung auf den WordSpans und CurrentWord-Eigenschaften aus und löst das TagsChanged-Ereignis aus.

   Private Sub SynchronousUpdate(ByVal currentRequest As SnapshotPoint, ByVal newSpans As NormalizedSnapshotSpanCollection, ByVal newCurrentWord As System.Nullable(Of SnapshotSpan))
       SyncLock updateLock
           If currentRequest <> RequestedPoint Then 
               Exit Sub 
           End If
   
           WordSpans = newSpans
           CurrentWord = newCurrentWord
   
           RaiseEvent TagsChanged(Me, New SnapshotSpanEventArgs(New SnapshotSpan(SourceBuffer.CurrentSnapshot, 0, SourceBuffer.CurrentSnapshot.Length)))
       End SyncLock 
   End Sub
   

   void SynchronousUpdate(SnapshotPoint currentRequest, NormalizedSnapshotSpanCollection newSpans, SnapshotSpan? newCurrentWord)
   {
       lock (updateLock)
       {
           if (currentRequest != RequestedPoint)
               return;
   
           WordSpans = newSpans;
           CurrentWord = newCurrentWord;
   
           var tempEvent = TagsChanged;
           if (tempEvent != null)
               tempEvent(this, new SnapshotSpanEventArgs(new SnapshotSpan(SourceBuffer.CurrentSnapshot, 0, SourceBuffer.CurrentSnapshot.Length)));
       }
   }
   

8. Sie müssen die GetTags-Methode implementieren. Diese Methode akzeptiert eine Auflistung SnapshotSpan-Objekte und gibt eine Enumeration von Tag spannen zurück.

   Implementieren Sie diese Methode in C# als iterator Ertrag der verzögerten Auswertung (also nur bei der Auswertung des Satzes einzelner Elemente zugegriffen wird) Tagen aktiviert. Fügen Sie in Visual Basic die Tags einer Liste hinzu, und geben Sie die Liste zurück.

   In diesem Fall gibt die Methode ein TagSpan-Objekt zurück, das TextMarkerTag“ blaues „hat einen blauen Hintergrund bereitstellt.

   Public Function GetTags(ByVal spans As NormalizedSnapshotSpanCollection) As IEnumerable(Of ITagSpan(Of HighlightWordTag)) Implements ITagger(Of HighlightWordTag).GetTags
       If CurrentWord Is Nothing Then 
           Return Nothing 
           Exit Function 
       End If 
   
       ' Hold on to a "snapshot" of the word spans and current word, so that we maintain the same 
       ' collection throughout 
       Dim currentWord__1 As SnapshotSpan = CurrentWord.Value
       Dim wordSpans__2 As NormalizedSnapshotSpanCollection = WordSpans
   
       If spans.Count = 0 OrElse WordSpans.Count = 0 Then 
           Return Nothing 
           Exit Function 
       End If 
   
       ' If the requested snapshot isn't the same as the one our words are on, translate our spans to the expected snapshot 
       If spans(0).Snapshot IsNot wordSpans__2(0).Snapshot Then
           wordSpans__2 = New NormalizedSnapshotSpanCollection(wordSpans__2.[Select](Function(span) span.TranslateTo(spans(0).Snapshot, SpanTrackingMode.EdgeExclusive)))
   
           currentWord__1 = currentWord__1.TranslateTo(spans(0).Snapshot, SpanTrackingMode.EdgeExclusive)
       End If 
       'in order to emulate the C# yield return functionality, 
       'create a list and add all the relevant spans to it, then return the list 
       Dim list As List(Of TagSpan(Of HighlightWordTag))
       list = New List(Of TagSpan(Of HighlightWordTag))()
   
       If spans.OverlapsWith(New NormalizedSnapshotSpanCollection(currentWord__1)) Then
           list.Add(New TagSpan(Of HighlightWordTag)(CurrentWord, New HighlightWordTag()))
       End If 
   
       For Each span As SnapshotSpan In NormalizedSnapshotSpanCollection.Overlap(spans, wordSpans__2)
           list.Add(New TagSpan(Of HighlightWordTag)(span, New HighlightWordTag()))
       Next 
       Return List
   End Function
   

   public IEnumerable<ITagSpan<HighlightWordTag>> GetTags(NormalizedSnapshotSpanCollection spans)
   {
       if (CurrentWord == null)
           yield break;
   
       // Hold on to a "snapshot" of the word spans and current word, so that we maintain the same
       // collection throughout
       SnapshotSpan currentWord = CurrentWord.Value;
       NormalizedSnapshotSpanCollection wordSpans = WordSpans;
   
       if (spans.Count == 0 || wordSpans.Count == 0)
           yield break;
   
       // If the requested snapshot isn't the same as the one our words are on, translate our spans to the expected snapshot 
       if (spans[0].Snapshot != wordSpans[0].Snapshot)
       {
           wordSpans = new NormalizedSnapshotSpanCollection(
               wordSpans.Select(span => span.TranslateTo(spans[0].Snapshot, SpanTrackingMode.EdgeExclusive)));
   
           currentWord = currentWord.TranslateTo(spans[0].Snapshot, SpanTrackingMode.EdgeExclusive);
       }
   
       // First, yield back the word the cursor is under (if it overlaps) 
       // Note that we'll yield back the same word again in the wordspans collection; 
       // the duplication here is expected. 
       if (spans.OverlapsWith(new NormalizedSnapshotSpanCollection(currentWord)))
           yield return new TagSpan<HighlightWordTag>(currentWord, new HighlightWordTag());
   
       // Second, yield all the other words in the file 
       foreach (SnapshotSpan span in NormalizedSnapshotSpanCollection.Overlap(spans, wordSpans))
       {
           yield return new TagSpan<HighlightWordTag>(span, new HighlightWordTag());
       }
   }
   

Erstellen eines Tagger-Anbieter

Um den Tagger zu erstellen, müssen Sie IViewTaggerProviderimplementieren. Diese Klasse ist ein MEF-Komponenten-Teil. Daher müssen Sie über die richtigen Attribute festlegen, damit diese Erweiterung erkannt wird.

Hinweis

Weitere Informationen über MEF finden Sie unter Managed Extensibility Framework (MEF).

So erstellen Sie einen Anbieter Tagger

1. Erstellen Sie eine Klasse, die HighlightWordTaggerProvider benannt wird, die IViewTaggerProviderimplementiert, und exportieren Sie sie mit ContentTypeAttribute „des Texts“ und TagTypeAttribute von TextMarkerTag.

   <Export(GetType(IViewTaggerProvider))>
   <ContentType("text")>
   <TagType(GetType(TextMarkerTag))>
   Friend Class HighlightWordTaggerProvider
       Implements IViewTaggerProvider
   

   [Export(typeof(IViewTaggerProvider))]
   [ContentType("text")]
   [TagType(typeof(TextMarkerTag))]
   internal class HighlightWordTaggerProvider : IViewTaggerProvider
   

2. Sie müssen zwei Editor Dienste, ITextSearchService und ITextStructureNavigatorSelectorServiceimportieren, um den Tagger zu instanziieren.

   Private _TextSearchService As ITextSearchService
   <Import()> _
   Friend Property TextSearchService() As ITextSearchService
       Get 
           Return _TextSearchService
       End Get 
       Set(ByVal value As ITextSearchService)
           _TextSearchService = value
       End Set 
   End Property 
   
   Private _TextStructureNavigatorSelector As ITextStructureNavigatorSelectorService
   <Import()>
   Friend Property TextStructureNavigatorSelector() As ITextStructureNavigatorSelectorService
       Get 
           Return _TextStructureNavigatorSelector
       End Get 
       Set(ByVal value As ITextStructureNavigatorSelectorService)
           _TextStructureNavigatorSelector = value
       End Set 
   End Property
   

   [Import]
   internal ITextSearchService TextSearchService { get; set; }
   
   [Import]
   internal ITextStructureNavigatorSelectorService TextStructureNavigatorSelector { get; set; }
   

3. Implementieren Sie die CreateTagger``1-Methode, um eine Instanz von HighlightWordTaggerzurückzugeben.

   Public Function CreateTagger(Of T As ITag)(ByVal textView As ITextView, ByVal buffer As ITextBuffer) As ITagger(Of T) Implements IViewTaggerProvider.CreateTagger
       'provide highlighting only on the top buffer 
       If textView.TextBuffer IsNot buffer Then 
           Return Nothing 
       End If 
   
       Dim textStructureNavigator As ITextStructureNavigator = TextStructureNavigatorSelector.GetTextStructureNavigator(buffer)
   
       Return TryCast(New HighlightWordTagger(textView, buffer, TextSearchService, textStructureNavigator), ITagger(Of T))
   End Function
   

   public ITagger<T> CreateTagger<T>(ITextView textView, ITextBuffer buffer) where T : ITag
   {
       //provide highlighting only on the top buffer 
       if (textView.TextBuffer != buffer)
           return null;
   
       ITextStructureNavigator textStructureNavigator =
           TextStructureNavigatorSelector.GetTextStructureNavigator(buffer);
   
       return new HighlightWordTagger(textView, buffer, TextSearchService, textStructureNavigator) as ITagger<T>;
   }
   

Erstellen und Testen von Code

Um diesen Code zu testen, erstellen Sie die HighlightWordTest-Projektmappe und führen Sie sie in der experimentellen Instanz aus.

So erstellen und testen die HighlightWordTest-Projektmappe

1. Erstellen Sie die Projektmappe.

2. Wenn Sie dieses Projekt im Debugger ausführen, wird eine zweite Instanz von Visual Studio instanziiert.

3. Erstellen Sie eine Textdatei, und geben Sie Text ein, in dem die Wörter z. B. „Hello " Hello " Hello“ überprüft werden.

4. Positionieren Sie den Cursor in einem der Vorkommen von „Hello“. Jedes Vorkommen sollte in blau hervorgehoben werden.

Siehe auch

Aufgaben

Exemplarische Vorgehensweise: Verknüpfen einer Dateinamenerweiterung eines Inhaltstyps