IAnchorInfo.ResolvedAnchor Свойство

Определение

Пространство имен:

System.Windows.Annotations

Сборка:

PresentationFramework.dll

Возвращает объект, представляющий местоположение в древовидной структуре, которое является результатом разрешения Anchor.

public:
 property System::Object ^ ResolvedAnchor { System::Object ^ get(); };

public object ResolvedAnchor { get; }

member this.ResolvedAnchor : obj

Public ReadOnly Property ResolvedAnchor As Object

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

Object

Объект, представляющий местоположение в древовидной структуре, которое является результатом разрешения Anchor. Тип определяется типом объекта, с которым связана заметка. Записки и маркерные выделения в потоковых и фиксированных документах всегда разрешаются как объект TextAnchor.

Примеры

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

В следующем примере показано, как реализовать обработчик событий такого списка, который служит областью комментариев:

void annotationsListBox_SelectionChanged(object sender, SelectionChangedEventArgs e)
{

    Annotation comment = (sender as ListBox).SelectedItem as Annotation;
    if (comment != null)
    {
        // IAnchorInfo info;
        // service is an AnnotationService object
        // comment is an Annotation object
        info = AnnotationHelper.GetAnchorInfo(this.service, comment);
        TextAnchor resolvedAnchor = info.ResolvedAnchor as TextAnchor;
        TextPointer textPointer = (TextPointer)resolvedAnchor.BoundingStart;
        textPointer.Paragraph.BringIntoView();
    }
}

Private Sub annotationsListBox_SelectionChanged(ByVal sender As Object, ByVal e As SelectionChangedEventArgs)

    Dim comment As Annotation = TryCast((TryCast(sender, ListBox)).SelectedItem, Annotation)
    If comment IsNot Nothing Then
        ' service is an AnnotationService object
        ' comment is an Annotation object
        info = AnnotationHelper.GetAnchorInfo(Me.service, comment)
        Dim resolvedAnchor As TextAnchor = TryCast(info.ResolvedAnchor, TextAnchor)
        Dim textPointer As TextPointer = CType(resolvedAnchor.BoundingStart, TextPointer)
        textPointer.Paragraph.BringIntoView()
    End If
End Sub