StylusPointCollection.Clone Metode

Definisi

Ruang nama:

System.Windows.Input

Rakitan:

PresentationCore.dll

StylusPointCollectionMenyalin .

public:
 System::Windows::Input::StylusPointCollection ^ Clone();

public System.Windows.Input.StylusPointCollection Clone ();

member this.Clone : unit -> System.Windows.Input.StylusPointCollection

Public Function Clone () As StylusPointCollection

Mengembalikan

StylusPointCollection

StylusPointCollection Baru yang berisi salinan StylusPoint objek di saat iniStylusPointCollection.

Contoh

Contoh berikut menunjukkan cara menyalin StylusPointCollection. Contohnya membuat goresan yang terdiri dari anggota StylusPointCollection dan menambahkannya ke InkCanvas. Contoh ini mengasumsikan bahwa ada yang InkCanvas disebut inkcanvs1.

Point[] rawPoints = new Point[]
    {
        new Point(100, 100),
        new Point(100, 200),
        new Point(200, 250),
        new Point(300, 300)
    };

StylusPointCollection points1 = new StylusPointCollection(rawPoints);

// Create a copy of points1 and change the second StylusPoint.
StylusPointCollection points2 = points1.Clone();
points2[1] = new StylusPoint(200, 100);

// Create a stroke from each StylusPointCollection and add them to
// inkCanvas1. Note that changing a StylusPoint in point2 did not
// affect points1.
Stroke stroke1 = new Stroke(points1);
inkCanvas1.Strokes.Add(stroke1);

Stroke stroke2 = new Stroke(points2);
stroke2.DrawingAttributes.Color = Colors.Red;
inkCanvas1.Strokes.Add(stroke2);

Dim rawPoints() As Point = {New Point(100, 100), _
                            New Point(100, 200), _
                            New Point(200, 250), _
                            New Point(300, 300)}

Dim points1 As New StylusPointCollection(rawPoints)

' Create a copy of points1 and change the second StylusPoint.
Dim points2 As StylusPointCollection = points1.Clone()
points2(1) = New StylusPoint(200, 100)

' Create a stroke from each StylusPointCollection and add them to
' inkCanvas1. Note that changing a StylusPoint in point2 did not
' affect points1.
Dim stroke1 As New Stroke(points1)
inkCanvas1.Strokes.Add(stroke1)

Dim stroke2 As New Stroke(points2)
stroke2.DrawingAttributes.Color = Colors.Red
inkCanvas1.Strokes.Add(stroke2)