Практическое руководство. Выбор рукописного ввода из пользовательского элемента управления

Статья
06/02/2023

Добавив IncrementalLassoHitTester в пользовательский элемент управления, вы можете включить элемент управления, чтобы пользователь мог выделить рукописный ввод с помощью инструмента лассо, аналогично тому, как InkCanvas выделяет рукописный ввод с помощью лассо.

В контексте этого примера предполагается, что вы знакомы с созданием пользовательского элемента управления с поддержкой рукописного ввода. Сведения о создании пользовательского элемента управления с поддержкой рукописного ввода см. в статье Создание элемента управления рукописным вводом.

Пример

Когда пользователь рисует лассо, IncrementalLassoHitTester прогнозирует, какие штрихи будут находиться в границах пути лассо после того, как пользователь завершит построение лассо. Штрихи, которые определяются в пределах пути лассо, можно рассматривать как выделение. Для выделенных штрихов также можно применить отмену выделения. Например, если пользователь меняет направление при рисовании лассо, IncrementalLassoHitTester может отменить выделение для некоторых штрихов.

IncrementalLassoHitTester вызывает событие SelectionChanged, которое позволяет пользовательскому элементу управления реагировать, пока пользователь рисует лассо. Например, вы можете изменять внешний вид штрихов по мере того, как пользователь выделяет их или отменяет выделение.

Управление режимом рукописного ввода

Это удобно для пользователя, если лассо отображается не так, как рукописный ввод в элементе управления. Для этого пользовательский элемент управления должен отслеживать, создает пользователь рукописный ввод или выделяет его. Самый простой способ сделать это — объявить перечисление с двумя значениями: одно указывает, что пользователь создает рукописный ввод, а другое — что пользователь выделяет рукописный ввод.

// Enum that keeps track of whether StrokeCollectionDemo is in ink mode
// or select mode.
public enum InkMode
{
    Ink, Select
}

' Enum that keeps track of whether StrokeCollectionDemo is in ink mode 
' or select mode.
Public Enum InkMode
    Ink
    [Select]
End Enum 'InkMode

Затем добавьте два DrawingAttributes в класс: один будет использоваться при создании рукописного ввода пользователем, другой будет использоваться при выделении рукописного ввода. В конструкторе инициализируйте DrawingAttributes и присоедините оба события AttributeChanged к одному обработчику событий. Присвойте свойство DrawingAttributes со значением DynamicRenderer для рукописного ввода DrawingAttributes.

DrawingAttributes inkDA;
DrawingAttributes selectDA;

Private inkDA As DrawingAttributes
Private selectDA As DrawingAttributes

// In the constructor.
// Selection drawing attributes use dark gray ink.
selectDA = new DrawingAttributes();
selectDA.Color = Colors.DarkGray;

// ink drawing attributes use default attributes
inkDA = new DrawingAttributes();
inkDA.Width = 5;
inkDA.Height = 5;

inkDA.AttributeChanged += new PropertyDataChangedEventHandler(DrawingAttributesChanged);
selectDA.AttributeChanged += new PropertyDataChangedEventHandler(DrawingAttributesChanged);

' In the constructor.
' Selection drawing attributes use dark gray ink.
selectDA = New DrawingAttributes()
selectDA.Color = Colors.DarkGray

' ink drawing attributes use default attributes
inkDA = New DrawingAttributes()
inkDA.Width = 5
inkDA.Height = 5

AddHandler inkDA.AttributeChanged, _
           AddressOf DrawingAttributesChanged

AddHandler selectDA.AttributeChanged, _
           AddressOf DrawingAttributesChanged

Добавьте свойство, которое предоставляет режим выделения. Когда пользователь изменяет режим выделения, задайте свойство DrawingAttributes DynamicRenderer соответствующему объекту DrawingAttributes, а затем повторно подключите свойство RootVisual к InkPresenter.

// Property to indicate whether the user is inputting or
// selecting ink.
public InkMode Mode
{
    get
    {
        return mode;
    }

    set
    {
        mode = value;

        // Set the DrawingAttributes of the DynamicRenderer
        if (mode == InkMode.Ink)
        {
            renderer.DrawingAttributes = inkDA;
        }
        else
        {
            renderer.DrawingAttributes = selectDA;
        }

        // Reattach the visual of the DynamicRenderer to the InkPresenter.
        presenter.DetachVisuals(renderer.RootVisual);
        presenter.AttachVisuals(renderer.RootVisual, renderer.DrawingAttributes);
    }
}

' Property to indicate whether the user is inputting or
' selecting ink.  
Public Property Mode() As InkMode
    Get
        Return Mode
    End Get

    Set(ByVal value As InkMode)
        modeState = value

        ' Set the DrawingAttributes of the DynamicRenderer
        If modeState = InkMode.Ink Then
            renderer.DrawingAttributes = inkDA
        Else
            renderer.DrawingAttributes = selectDA
        End If

        ' Reattach the visual of the DynamicRenderer to the InkPresenter.
        presenter.DetachVisuals(renderer.RootVisual)
        presenter.AttachVisuals(renderer.RootVisual, renderer.DrawingAttributes)
    End Set
End Property

Предоставьте DrawingAttributes как свойства, чтобы приложения могли определять внешний вид штрихов рукописного ввода и штрихов выделения.

// Property to allow the user to change the pen's DrawingAttributes.
public DrawingAttributes InkDrawingAttributes
{
    get
    {
        return inkDA;
    }
}

// Property to allow the user to change the Selector'newStroke DrawingAttributes.
public DrawingAttributes SelectDrawingAttributes
{
    get
    {
        return selectDA;
    }
}

' Property to allow the user to change the pen's DrawingAttributes.
Public ReadOnly Property InkDrawingAttributes() As DrawingAttributes
    Get
        Return inkDA
    End Get
End Property

' Property to allow the user to change the Selector'newStroke DrawingAttributes.
Public ReadOnly Property SelectDrawingAttributes() As DrawingAttributes
    Get
        Return selectDA
    End Get
End Property

Если свойство объекта DrawingAttributes изменится, RootVisual можно повторно подключить к InkPresenter. В обработчике событий для события AttributeChanged повторно подключите RootVisual к InkPresenter.

void DrawingAttributesChanged(object sender, PropertyDataChangedEventArgs e)
{
    // Reattach the visual of the DynamicRenderer to the InkPresenter
    // whenever the DrawingAttributes change.
    presenter.DetachVisuals(renderer.RootVisual);
    presenter.AttachVisuals(renderer.RootVisual, renderer.DrawingAttributes);
}

Private Sub DrawingAttributesChanged(ByVal sender As Object, _
                             ByVal e As PropertyDataChangedEventArgs)

    ' Reattach the visual of the DynamicRenderer to the InkPresenter 
    ' whenever the DrawingAttributes change.
    presenter.DetachVisuals(renderer.RootVisual)
    presenter.AttachVisuals(renderer.RootVisual, _
                            renderer.DrawingAttributes)

End Sub

Использование IncrementalLassoHitTester

Создание и инициализация StrokeCollection, где содержатся выделенные штрихи.

// StylusPointCollection that collects the stylus points from the stylus events.
StylusPointCollection stylusPoints;

' StylusPointCollection that collects the stylus points from the stylus events.
Private stylusPoints As StylusPointCollection

Когда пользователь начнет рисование штриха, рукописного ввода или лассо, отмените выбор для выделенных штрихов. Затем, если пользователь рисует лассо, создайте IncrementalLassoHitTester путем вызова GetIncrementalLassoHitTester, подпишитесь на событие SelectionChanged и вызовите AddPoints. Этот код может быть отдельным методом и вызывается из методов OnStylusDown и OnMouseDown.

private void InitializeHitTester(StylusPointCollection collectedPoints)
{
    // Deselect any selected strokes.
    foreach (Stroke selectedStroke in selectedStrokes)
    {
        selectedStroke.DrawingAttributes.Color = inkDA.Color;
    }
    selectedStrokes.Clear();

    if (mode == InkMode.Select)
    {
        // Remove the previously drawn lasso, if it exists.
        if (lassoPath != null)
        {
            presenter.Strokes.Remove(lassoPath);
            lassoPath = null;
        }

        selectionTester =
            presenter.Strokes.GetIncrementalLassoHitTester(80);
        selectionTester.SelectionChanged +=
            new LassoSelectionChangedEventHandler(selectionTester_SelectionChanged);
        selectionTester.AddPoints(collectedPoints);
    }
}

Private Sub InitializeHitTester(ByVal collectedPoints As StylusPointCollection)

    ' Deselect any selected strokes.
    Dim selectedStroke As Stroke
    For Each selectedStroke In selectedStrokes
        selectedStroke.DrawingAttributes.Color = inkDA.Color
    Next selectedStroke
    selectedStrokes.Clear()

    If modeState = InkMode.Select Then
        ' Remove the previously drawn lasso, if it exists.
        If Not (lassoPath Is Nothing) Then
            presenter.Strokes.Remove(lassoPath)
            lassoPath = Nothing
        End If

        selectionTester = presenter.Strokes.GetIncrementalLassoHitTester(80)
        AddHandler selectionTester.SelectionChanged, AddressOf selectionTester_SelectionChanged
        selectionTester.AddPoints(collectedPoints)
    End If

End Sub

Добавьте точки пера в IncrementalLassoHitTester, пока пользователь рисует лассо. Вызовите следующий метод из методов OnStylusMove, OnStylusUp, OnMouseMove и OnMouseLeftButtonUp.

private void AddPointsToHitTester(StylusPointCollection collectedPoints)
{

    if (mode == InkMode.Select &&
        selectionTester != null &&
        selectionTester.IsValid)
    {
        // When the control is selecting strokes, add the
        // stylus packetList to selectionTester.
        selectionTester.AddPoints(collectedPoints);
    }
}

Private Sub AddPointsToHitTester(ByVal collectedPoints As StylusPointCollection)

    If modeState = InkMode.Select AndAlso _
       Not selectionTester Is Nothing AndAlso _
       selectionTester.IsValid Then

        ' When the control is selecting strokes, add the
        ' stylus packetList to selectionTester.
        selectionTester.AddPoints(collectedPoints)
    End If

End Sub

Обработайте событиеIncrementalLassoHitTester.SelectionChanged, чтобы реагировать на выделение или отмену выделения штрихов пользователем. Класс LassoSelectionChangedEventArgs имеет свойства SelectedStrokes и DeselectedStrokes, получающие штрихи, которые были выделен или для них было отменено выделение, соответственно.

void selectionTester_SelectionChanged(object sender,
    LassoSelectionChangedEventArgs args)
{
    // Change the color of all selected strokes to red.
    foreach (Stroke selectedStroke in args.SelectedStrokes)
    {
        selectedStroke.DrawingAttributes.Color = Colors.Red;
        selectedStrokes.Add(selectedStroke);
    }

    // Change the color of all unselected strokes to
    // their original color.
    foreach (Stroke unselectedStroke in args.DeselectedStrokes)
    {
        unselectedStroke.DrawingAttributes.Color = inkDA.Color;
        selectedStrokes.Remove(unselectedStroke);
    }
}

Private Sub selectionTester_SelectionChanged(ByVal sender As Object, _
                                     ByVal args As LassoSelectionChangedEventArgs)

    ' Change the color of all selected strokes to red.
    Dim selectedStroke As Stroke
    For Each selectedStroke In args.SelectedStrokes
        selectedStroke.DrawingAttributes.Color = Colors.Red
        selectedStrokes.Add(selectedStroke)
    Next selectedStroke

    ' Change the color of all unselected strokes to 
    ' their original color.
    Dim unselectedStroke As Stroke
    For Each unselectedStroke In args.DeselectedStrokes
        unselectedStroke.DrawingAttributes.Color = inkDA.Color
        selectedStrokes.Remove(unselectedStroke)
    Next unselectedStroke

End Sub

Когда пользователь завершит рисование лассо, отмените подписку на событие SelectionChanged и вызовите EndHitTesting.

if (mode == InkMode.Select && lassoPath == null)
{
    // Add the lasso to the InkPresenter and add the packetList
    // to selectionTester.
    lassoPath = newStroke;
    lassoPath.DrawingAttributes = selectDA.Clone();
    presenter.Strokes.Add(lassoPath);
    selectionTester.SelectionChanged -= new LassoSelectionChangedEventHandler
                    (selectionTester_SelectionChanged);
    selectionTester.EndHitTesting();
}

If modeState = InkMode.Select AndAlso lassoPath Is Nothing Then
    ' Add the lasso to the InkPresenter and add the packetList
    ' to selectionTester.
    lassoPath = newStroke
    lassoPath.DrawingAttributes = selectDA.Clone()
    presenter.Strokes.Add(lassoPath)
    RemoveHandler selectionTester.SelectionChanged, _
                  AddressOf selectionTester_SelectionChanged
    selectionTester.EndHitTesting()
End If

Сборка

Следующий пример — это пользовательский элемент управления, позволяющий пользователю выделять рукописный ввод с помощью лассо.

using System;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Media;
using System.Windows.Input;
using System.Windows.Input.StylusPlugIns;
using System.Windows.Ink;

// Enum that keeps track of whether StrokeCollectionDemo is in ink mode
// or select mode.
public enum InkMode
{
    Ink, Select
}

// This control allows the user to input and select ink.  When the
// user selects ink, the lasso remains visible until they erase, or clip
// the selected strokes, or clear the selection.  When the control is
// in selection mode, strokes that are selected turn red.
public class InkSelector : Label
{
    InkMode mode;

    DrawingAttributes inkDA;
    DrawingAttributes selectDA;

    InkPresenter presenter;
    IncrementalLassoHitTester selectionTester;
    StrokeCollection selectedStrokes = new StrokeCollection();

    // StylusPointCollection that collects the stylus points from the stylus events.
    StylusPointCollection stylusPoints;
    // Stroke that represents the lasso.
    Stroke lassoPath;

    DynamicRenderer renderer;

    public InkSelector()
    {
        mode = InkMode.Ink;

        // Use an InkPresenter to display the strokes on the custom control.
        presenter = new InkPresenter();
        this.Content = presenter;

        // In the constructor.
        // Selection drawing attributes use dark gray ink.
        selectDA = new DrawingAttributes();
        selectDA.Color = Colors.DarkGray;

        // ink drawing attributes use default attributes
        inkDA = new DrawingAttributes();
        inkDA.Width = 5;
        inkDA.Height = 5;

        inkDA.AttributeChanged += new PropertyDataChangedEventHandler(DrawingAttributesChanged);
        selectDA.AttributeChanged += new PropertyDataChangedEventHandler(DrawingAttributesChanged);

        // Add a DynmaicRenderer to the control so ink appears
        // to "flow" from the tablet pen.
        renderer = new DynamicRenderer();
        renderer.DrawingAttributes = inkDA;
        this.StylusPlugIns.Add(renderer);
        presenter.AttachVisuals(renderer.RootVisual,
            renderer.DrawingAttributes);
    }

    static InkSelector()
    {
        // Allow ink to be drawn only within the bounds of the control.
        Type owner = typeof(InkSelector);
        ClipToBoundsProperty.OverrideMetadata(owner,
            new FrameworkPropertyMetadata(true));
    }

    // Prepare to collect stylus packets. If Mode is set to Select,
    // get the IncrementalHitTester from the InkPresenter'newStroke
    // StrokeCollection and subscribe to its StrokeHitChanged event.
    protected override void OnStylusDown(StylusDownEventArgs e)
    {
        base.OnStylusDown(e);

        Stylus.Capture(this);

        // Create a new StylusPointCollection using the StylusPointDescription
        // from the stylus points in the StylusDownEventArgs.
        stylusPoints = new StylusPointCollection();
        StylusPointCollection eventPoints = e.GetStylusPoints(this, stylusPoints.Description);

        stylusPoints.Add(eventPoints);

        InitializeHitTester(eventPoints);
    }

    protected override void OnMouseLeftButtonDown(MouseButtonEventArgs e)
    {
        base.OnMouseLeftButtonDown(e);

        Mouse.Capture(this);

        if (e.StylusDevice != null)
        {
            return;
        }

        Point pt = e.GetPosition(this);

        StylusPointCollection collectedPoints = new StylusPointCollection(new Point[] { pt });

        stylusPoints = new StylusPointCollection();

        stylusPoints.Add(collectedPoints);

        InitializeHitTester(collectedPoints);
    }
    private void InitializeHitTester(StylusPointCollection collectedPoints)
    {
        // Deselect any selected strokes.
        foreach (Stroke selectedStroke in selectedStrokes)
        {
            selectedStroke.DrawingAttributes.Color = inkDA.Color;
        }
        selectedStrokes.Clear();

        if (mode == InkMode.Select)
        {
            // Remove the previously drawn lasso, if it exists.
            if (lassoPath != null)
            {
                presenter.Strokes.Remove(lassoPath);
                lassoPath = null;
            }

            selectionTester =
                presenter.Strokes.GetIncrementalLassoHitTester(80);
            selectionTester.SelectionChanged +=
                new LassoSelectionChangedEventHandler(selectionTester_SelectionChanged);
            selectionTester.AddPoints(collectedPoints);
        }
    }

    // Collect the stylus packets as the stylus moves.
    protected override void OnStylusMove(StylusEventArgs e)
    {
        if (stylusPoints == null)
        {
            return;
        }

        StylusPointCollection collectedPoints = e.GetStylusPoints(this, stylusPoints.Description);
        stylusPoints.Add(collectedPoints);
        AddPointsToHitTester(collectedPoints);
    }

    protected override void OnMouseMove(MouseEventArgs e)
    {

        base.OnMouseMove(e);

        if (e.StylusDevice != null)
        {
            return;
        }

        if (e.LeftButton == MouseButtonState.Released)
        {
            return;
        }

        stylusPoints ??= new StylusPointCollection();

        Point pt = e.GetPosition(this);

        StylusPointCollection collectedPoints = new StylusPointCollection(new Point[] { pt });

        stylusPoints.Add(collectedPoints);

        AddPointsToHitTester(collectedPoints);
    }

    private void AddPointsToHitTester(StylusPointCollection collectedPoints)
    {

        if (mode == InkMode.Select &&
            selectionTester != null &&
            selectionTester.IsValid)
        {
            // When the control is selecting strokes, add the
            // stylus packetList to selectionTester.
            selectionTester.AddPoints(collectedPoints);
        }
    }

    // When the user lifts the stylus, create a Stroke from the
    // collected stylus points and add it to the InkPresenter.
    // When the control is selecting strokes, add the
    // point data to the IncrementalHitTester.
    protected override void OnStylusUp(StylusEventArgs e)
    {
        stylusPoints ??= new StylusPointCollection();
        StylusPointCollection collectedPoints =
            e.GetStylusPoints(this, stylusPoints.Description);

        stylusPoints.Add(collectedPoints);
        AddPointsToHitTester(collectedPoints);
        AddStrokeToPresenter();
        stylusPoints = null;

        Stylus.Capture(null);
    }

    protected override void OnMouseLeftButtonUp(MouseButtonEventArgs e)
    {

        base.OnMouseLeftButtonUp(e);

        if (e.StylusDevice != null) return;

        if (stylusPoints == null) stylusPoints = new StylusPointCollection();

        Point pt = e.GetPosition(this);

        StylusPointCollection collectedPoints = new StylusPointCollection(new Point[] { pt });

        stylusPoints.Add(collectedPoints);
        AddPointsToHitTester(collectedPoints);
        AddStrokeToPresenter();

        stylusPoints = null;

        Mouse.Capture(null);
    }

    private void AddStrokeToPresenter()
    {
        Stroke newStroke = new Stroke(stylusPoints);

        if (mode == InkMode.Ink)
        {
            // Add the stroke to the InkPresenter.
            newStroke.DrawingAttributes = inkDA.Clone();
            presenter.Strokes.Add(newStroke);
        }

        if (mode == InkMode.Select && lassoPath == null)
        {
            // Add the lasso to the InkPresenter and add the packetList
            // to selectionTester.
            lassoPath = newStroke;
            lassoPath.DrawingAttributes = selectDA.Clone();
            presenter.Strokes.Add(lassoPath);
            selectionTester.SelectionChanged -= new LassoSelectionChangedEventHandler
                            (selectionTester_SelectionChanged);
            selectionTester.EndHitTesting();
        }
    }

    void selectionTester_SelectionChanged(object sender,
        LassoSelectionChangedEventArgs args)
    {
        // Change the color of all selected strokes to red.
        foreach (Stroke selectedStroke in args.SelectedStrokes)
        {
            selectedStroke.DrawingAttributes.Color = Colors.Red;
            selectedStrokes.Add(selectedStroke);
        }

        // Change the color of all unselected strokes to
        // their original color.
        foreach (Stroke unselectedStroke in args.DeselectedStrokes)
        {
            unselectedStroke.DrawingAttributes.Color = inkDA.Color;
            selectedStrokes.Remove(unselectedStroke);
        }
    }

    // Property to indicate whether the user is inputting or
    // selecting ink.
    public InkMode Mode
    {
        get
        {
            return mode;
        }

        set
        {
            mode = value;

            // Set the DrawingAttributes of the DynamicRenderer
            if (mode == InkMode.Ink)
            {
                renderer.DrawingAttributes = inkDA;
            }
            else
            {
                renderer.DrawingAttributes = selectDA;
            }

            // Reattach the visual of the DynamicRenderer to the InkPresenter.
            presenter.DetachVisuals(renderer.RootVisual);
            presenter.AttachVisuals(renderer.RootVisual, renderer.DrawingAttributes);
        }
    }
    void DrawingAttributesChanged(object sender, PropertyDataChangedEventArgs e)
    {
        // Reattach the visual of the DynamicRenderer to the InkPresenter
        // whenever the DrawingAttributes change.
        presenter.DetachVisuals(renderer.RootVisual);
        presenter.AttachVisuals(renderer.RootVisual, renderer.DrawingAttributes);
    }

    // Property to allow the user to change the pen's DrawingAttributes.
    public DrawingAttributes InkDrawingAttributes
    {
        get
        {
            return inkDA;
        }
    }

    // Property to allow the user to change the Selector'newStroke DrawingAttributes.
    public DrawingAttributes SelectDrawingAttributes
    {
        get
        {
            return selectDA;
        }
    }
}

Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Media
Imports System.Windows.Input
Imports System.Windows.Input.StylusPlugIns
Imports System.Windows.Ink


' Enum that keeps track of whether StrokeCollectionDemo is in ink mode 
' or select mode.
Public Enum InkMode
    Ink
    [Select]
End Enum 'InkMode

' This control allows the user to input and select ink.  When the
' user selects ink, the lasso remains visible until they erase, or clip
' the selected strokes, or clear the selection.  When the control is
' in selection mode, strokes that are selected turn red.
Public Class InkSelector
    Inherits Label

    Private modeState As InkMode

    Private inkDA As DrawingAttributes
    Private selectDA As DrawingAttributes

    Private presenter As InkPresenter
    Private selectionTester As IncrementalLassoHitTester
    Private selectedStrokes As New StrokeCollection()

    ' StylusPointCollection that collects the stylus points from the stylus events.
    Private stylusPoints As StylusPointCollection

    ' Stroke that represents the lasso.
    Private lassoPath As Stroke

    Private renderer As DynamicRenderer


    Public Sub New()
        modeState = InkMode.Ink

        ' Use an InkPresenter to display the strokes on the custom control.
        presenter = New InkPresenter()
        Me.Content = presenter

        ' In the constructor.
        ' Selection drawing attributes use dark gray ink.
        selectDA = New DrawingAttributes()
        selectDA.Color = Colors.DarkGray

        ' ink drawing attributes use default attributes
        inkDA = New DrawingAttributes()
        inkDA.Width = 5
        inkDA.Height = 5

        AddHandler inkDA.AttributeChanged, _
                   AddressOf DrawingAttributesChanged

        AddHandler selectDA.AttributeChanged, _
                   AddressOf DrawingAttributesChanged

        ' Add a DynmaicRenderer to the control so ink appears
        ' to "flow" from the tablet pen.
        renderer = New DynamicRenderer()
        renderer.DrawingAttributes = inkDA
        Me.StylusPlugIns.Add(renderer)
        presenter.AttachVisuals(renderer.RootVisual, _
            renderer.DrawingAttributes)

    End Sub


    Shared Sub New()
        ' Allow ink to be drawn only within the bounds of the control.
        Dim owner As Type = GetType(InkSelector)
        ClipToBoundsProperty.OverrideMetadata(owner, _
            New FrameworkPropertyMetadata(True))

    End Sub

    ' Prepare to collect stylus packets. If Mode is set to Select,  
    ' get the IncrementalHitTester from the InkPresenter'newStroke 
    ' StrokeCollection and subscribe to its StrokeHitChanged event.
    Protected Overrides Sub OnStylusDown(ByVal e As StylusDownEventArgs)
        MyBase.OnStylusDown(e)

        Stylus.Capture(Me)

        ' Create a new StylusPointCollection using the StylusPointDescription
        ' from the stylus points in the StylusDownEventArgs.
        stylusPoints = New StylusPointCollection()
        Dim eventPoints As StylusPointCollection = e.GetStylusPoints(Me, stylusPoints.Description)

        stylusPoints.Add(eventPoints)

        InitializeHitTester(eventPoints)

    End Sub


    Protected Overrides Sub OnMouseLeftButtonDown(ByVal e As MouseButtonEventArgs)
        MyBase.OnMouseLeftButtonDown(e)

        Mouse.Capture(Me)

        If Not (e.StylusDevice Is Nothing) Then
            Return
        End If

        Dim pt As Point = e.GetPosition(Me)

        Dim collectedPoints As New StylusPointCollection(New Point() {pt})

        stylusPoints = New StylusPointCollection()

        stylusPoints.Add(collectedPoints)

        InitializeHitTester(collectedPoints)

    End Sub


    Private Sub InitializeHitTester(ByVal collectedPoints As StylusPointCollection)

        ' Deselect any selected strokes.
        Dim selectedStroke As Stroke
        For Each selectedStroke In selectedStrokes
            selectedStroke.DrawingAttributes.Color = inkDA.Color
        Next selectedStroke
        selectedStrokes.Clear()

        If modeState = InkMode.Select Then
            ' Remove the previously drawn lasso, if it exists.
            If Not (lassoPath Is Nothing) Then
                presenter.Strokes.Remove(lassoPath)
                lassoPath = Nothing
            End If

            selectionTester = presenter.Strokes.GetIncrementalLassoHitTester(80)
            AddHandler selectionTester.SelectionChanged, AddressOf selectionTester_SelectionChanged
            selectionTester.AddPoints(collectedPoints)
        End If

    End Sub

    ' Collect the stylus packets as the stylus moves.
    Protected Overrides Sub OnStylusMove(ByVal e As StylusEventArgs)

        If stylusPoints Is Nothing Then
            Return
        End If

        Dim collectedPoints As StylusPointCollection = e.GetStylusPoints(Me, stylusPoints.Description)
        stylusPoints.Add(collectedPoints)
        AddPointsToHitTester(collectedPoints)

    End Sub


    Protected Overrides Sub OnMouseMove(ByVal e As MouseEventArgs)

        MyBase.OnMouseMove(e)

        If Not (e.StylusDevice Is Nothing) Then
            Return
        End If

        If e.LeftButton = MouseButtonState.Released Then
            Return
        End If

        If stylusPoints Is Nothing Then
            stylusPoints = New StylusPointCollection()
        End If

        Dim pt As Point = e.GetPosition(Me)

        Dim collectedPoints As New StylusPointCollection(New Point() {pt})

        stylusPoints.Add(collectedPoints)

        AddPointsToHitTester(collectedPoints)

    End Sub


    Private Sub AddPointsToHitTester(ByVal collectedPoints As StylusPointCollection)

        If modeState = InkMode.Select AndAlso _
           Not selectionTester Is Nothing AndAlso _
           selectionTester.IsValid Then

            ' When the control is selecting strokes, add the
            ' stylus packetList to selectionTester.
            selectionTester.AddPoints(collectedPoints)
        End If

    End Sub

    ' When the user lifts the stylus, create a Stroke from the
    ' collected stylus points and add it to the InkPresenter.
    ' When the control is selecting strokes, add the
    ' point data to the IncrementalHitTester.
    Protected Overrides Sub OnStylusUp(ByVal e As StylusEventArgs)

        If stylusPoints Is Nothing Then
            stylusPoints = New StylusPointCollection()
        End If

        Dim collectedPoints As StylusPointCollection = _
            e.GetStylusPoints(Me, stylusPoints.Description)

        stylusPoints.Add(collectedPoints)
        AddPointsToHitTester(collectedPoints)
        AddStrokeToPresenter()

        stylusPoints = Nothing

        Stylus.Capture(Nothing)

    End Sub


    Protected Overrides Sub OnMouseLeftButtonUp(ByVal e As MouseButtonEventArgs)

        MyBase.OnMouseLeftButtonUp(e)

        If Not (e.StylusDevice Is Nothing) Then
            Return
        End If
        If stylusPoints Is Nothing Then
            stylusPoints = New StylusPointCollection()
        End If
        Dim pt As Point = e.GetPosition(Me)

        Dim collectedPoints As New StylusPointCollection(New Point() {pt})

        stylusPoints.Add(collectedPoints)
        AddPointsToHitTester(collectedPoints)
        AddStrokeToPresenter()

        stylusPoints = Nothing

        Mouse.Capture(Nothing)

    End Sub


    Private Sub AddStrokeToPresenter()
        Dim newStroke As New Stroke(stylusPoints)

        If modeState = InkMode.Ink Then
            ' Add the stroke to the InkPresenter.
            newStroke.DrawingAttributes = inkDA.Clone()
            presenter.Strokes.Add(newStroke)
        End If

        If modeState = InkMode.Select AndAlso lassoPath Is Nothing Then
            ' Add the lasso to the InkPresenter and add the packetList
            ' to selectionTester.
            lassoPath = newStroke
            lassoPath.DrawingAttributes = selectDA.Clone()
            presenter.Strokes.Add(lassoPath)
            RemoveHandler selectionTester.SelectionChanged, _
                          AddressOf selectionTester_SelectionChanged
            selectionTester.EndHitTesting()
        End If

    End Sub

    Private Sub selectionTester_SelectionChanged(ByVal sender As Object, _
                                         ByVal args As LassoSelectionChangedEventArgs)

        ' Change the color of all selected strokes to red.
        Dim selectedStroke As Stroke
        For Each selectedStroke In args.SelectedStrokes
            selectedStroke.DrawingAttributes.Color = Colors.Red
            selectedStrokes.Add(selectedStroke)
        Next selectedStroke

        ' Change the color of all unselected strokes to 
        ' their original color.
        Dim unselectedStroke As Stroke
        For Each unselectedStroke In args.DeselectedStrokes
            unselectedStroke.DrawingAttributes.Color = inkDA.Color
            selectedStrokes.Remove(unselectedStroke)
        Next unselectedStroke

    End Sub

    ' Property to indicate whether the user is inputting or
    ' selecting ink.  
    Public Property Mode() As InkMode
        Get
            Return Mode
        End Get

        Set(ByVal value As InkMode)
            modeState = value

            ' Set the DrawingAttributes of the DynamicRenderer
            If modeState = InkMode.Ink Then
                renderer.DrawingAttributes = inkDA
            Else
                renderer.DrawingAttributes = selectDA
            End If

            ' Reattach the visual of the DynamicRenderer to the InkPresenter.
            presenter.DetachVisuals(renderer.RootVisual)
            presenter.AttachVisuals(renderer.RootVisual, renderer.DrawingAttributes)
        End Set
    End Property
    Private Sub DrawingAttributesChanged(ByVal sender As Object, _
                                 ByVal e As PropertyDataChangedEventArgs)

        ' Reattach the visual of the DynamicRenderer to the InkPresenter 
        ' whenever the DrawingAttributes change.
        presenter.DetachVisuals(renderer.RootVisual)
        presenter.AttachVisuals(renderer.RootVisual, _
                                renderer.DrawingAttributes)

    End Sub

    ' Property to allow the user to change the pen's DrawingAttributes.
    Public ReadOnly Property InkDrawingAttributes() As DrawingAttributes
        Get
            Return inkDA
        End Get
    End Property

    ' Property to allow the user to change the Selector'newStroke DrawingAttributes.
    Public ReadOnly Property SelectDrawingAttributes() As DrawingAttributes
        Get
            Return selectDA
        End Get
    End Property

End Class

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

Практическое руководство. Выбор рукописного ввода из пользовательского элемента управления

Пример

Управление режимом рукописного ввода

Использование IncrementalLassoHitTester

Сборка

См. также

Дополнительные ресурсы