次の方法で共有


Stroke.StylusPoints プロパティ

定義

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のオブジェクトを割り当てたり、すべてのオブジェクトStylusPointsStylusPoint削除しようとすると、例外が発生します。

適用対象