Partager via


Pen.Clone Méthode

Définition

Crée une copie exacte de cette Pen.

public:
 virtual System::Object ^ Clone();
public object Clone ();
abstract member Clone : unit -> obj
override this.Clone : unit -> obj
Public Function Clone () As Object

Retours

Un Object qui peut être casté en Pen.

Implémente

Exemples

L’exemple de code suivant est conçu pour être utilisé avec Windows Forms et nécessite PaintEventArgse, qui est un paramètre du gestionnaire d’événements Paint. Le code effectue les actions suivantes :

  • Crée un Pen.

  • Crée une copie de ce stylet.

  • Dessine une ligne sur l’écran à l’aide de la copie du stylet.

public:
   void Clone_Example( PaintEventArgs^ e )
   {
      
      // Create a Pen object.
      Pen^ myPen = gcnew Pen( Color::Black,5.0f );
      
      // Clone myPen.
      Pen^ clonePen = dynamic_cast<Pen^>(myPen->Clone());
      
      // Draw a line with clonePen.
      e->Graphics->DrawLine( clonePen, 0, 0, 100, 100 );
   }
public void Clone_Example(PaintEventArgs e)
{
             
    // Create a Pen object.
    Pen myPen = new Pen(Color.Black, 5);
             
    // Clone myPen.
    Pen clonePen = (Pen)myPen.Clone();
             
    // Draw a line with clonePen.
    e.Graphics.DrawLine(clonePen, 0, 0, 100, 100);
}
Public Sub Clone_Example(ByVal e As PaintEventArgs)

    ' Create a Pen object.
    Dim myPen As New Pen(Color.Black, 5)

    ' Clone myPen.
    Dim clonePen As Pen = CType(myPen.Clone(), Pen)

    ' Draw a line with clonePen.
    e.Graphics.DrawLine(clonePen, 0, 0, 100, 100)
End Sub

S’applique à