Stroke.StylusPoints プロパティ

定義

名前空間:

System.Windows.Ink

アセンブリ:

PresentationCore.dll

Stroke のスタイラス ポイントを返します。

public:
 property System::Windows::Input::StylusPointCollection ^ StylusPoints { System::Windows::Input::StylusPointCollection ^ get(); void set(System::Windows::Input::StylusPointCollection ^ value); };

public System.Windows.Input.StylusPointCollection StylusPoints { get; set; }

member this.StylusPoints : System.Windows.Input.StylusPointCollection with get, set

Public Property StylusPoints As StylusPointCollection

プロパティ値

StylusPointCollection

現在の StylusPointCollection を表すスタイラス ポイントを格納する Stroke。

例

次の例は、それぞれStylusPointで円を描画するオーバーライドStrokeされた部分です。 プロパティが FitToCurve 設定 trueされている場合は、 GetBezierStylusPoints スタイラス ポイントを取得するために使用されます。 それ以外の場合は StylusPoints 、プロパティが使用されます。

protected override void DrawCore(DrawingContext context, DrawingAttributes overrides)
{
    // Draw the stroke. Calling base.DrawCore accomplishes the same thing.
    Geometry geometry = GetGeometry(overrides);
    context.DrawGeometry(new SolidColorBrush(overrides.Color), null, geometry);

    StylusPointCollection points;

    // Get the stylus points used to draw the stroke.  The points used depends on
    // the value of FitToCurve.
    if (this.DrawingAttributes.FitToCurve)
    {
        points = this.GetBezierStylusPoints();
    }
    else
    {
        points = this.StylusPoints;
    }

    // Draw a circle at each stylus point.
    foreach (StylusPoint p in points)
    {
        context.DrawEllipse(null, new Pen(Brushes.Black, 1), (Point)p, 5, 5);
    }
}

Protected Overrides Sub DrawCore(ByVal context As DrawingContext, _
        ByVal overridedAttributes As DrawingAttributes)

    ' Draw the stroke. Calling base.DrawCore accomplishes the same thing.
    Dim geometry As Geometry = GetGeometry(overridedAttributes)
    context.DrawGeometry(New SolidColorBrush(overridedAttributes.Color), Nothing, geometry)

    Dim points As StylusPointCollection

    ' Get the stylus points used to draw the stroke.  The points used depends on
    ' the value of FitToCurve.
    If Me.DrawingAttributes.FitToCurve Then
        points = Me.GetBezierStylusPoints()
    Else
        points = Me.StylusPoints
    End If

    ' Draw a circle at each stylus point.
    Dim p As StylusPoint
    For Each p In points
        context.DrawEllipse(Nothing, New Pen(Brushes.Black, 1), CType(p, Point), 5, 5)
    Next p

End Sub

注釈

プロパティのプロパティが設定trueされているときに使用されるスタイラス ポイントをFitToCurveDrawingAttributes取得するには、メソッドをGetBezierStylusPoints使用します。

注意

StylusPointCollectionプロパティにStylusPoints割り当てられるプロパティには、少なくとも 1 つがStylusPoint含まれている必要があります。 空StylusPointCollectionStylusPointsのオブジェクトを割り当てたり、すべてのオブジェクトStylusPointsをStylusPoint削除しようとすると、例外が発生します。