次の方法で共有


Stroke.GetBezierStylusPoints メソッド

定義

Stroketrue の場合に FitToCurve が使用するスタイラス ポイントを返します。

public:
 System::Windows::Input::StylusPointCollection ^ GetBezierStylusPoints();
public System.Windows.Input.StylusPointCollection GetBezierStylusPoints ();
member this.GetBezierStylusPoints : unit -> System.Windows.Input.StylusPointCollection
Public Function GetBezierStylusPoints () As StylusPointCollection

戻り値

StylusPointCollectionが のスパFitToCurvetrueインに沿ったスタイラス ポイントをStroke格納する 。

次の例では、 のそれぞれ StylusPoint で円を描画する方法を Stroke示します。 プロパティが FitToCurvetrueGetBezierStylusPoints設定されている場合、 はスタイラス ポイントを取得するために使用されます。 それ以外の場合は、 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

注釈

メソッドはGetBezierStylusPoints、 プロパティの プロパティが に設定されているときに FitToCurve 使用するStrokeスタイラス ポイントを含む新しい StylusPointCollectionDrawingAttributestrue返します。 が に設定されている場合 FitToCurve に使用されるスタイラス ポイントを false取得するには、 プロパティを StylusPoints 使用します。

適用対象