Partager via


Font.Clone Méthode

Définition

Crée une copie exacte de cette Font.

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

Retours

La Font cette méthode crée, caste en tant que Object.

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 clone un Font et dessine du texte avec cette police.

public:
   void Clone_Example( PaintEventArgs^ e )
   {
      // Create a Font object.
      System::Drawing::Font^ myFont = gcnew System::Drawing::Font( "Arial",16 );

      // Create a copy of myFont.
      System::Drawing::Font^ cloneFont = dynamic_cast<System::Drawing::Font^>(myFont->Clone());

      // Use cloneFont to draw text to the screen.
      e->Graphics->DrawString( "This is a cloned font", cloneFont, Brushes::Black, 0, 0 );
   }
public void Clone_Example(PaintEventArgs e)
{
    // Create a Font object.
    Font myFont = new Font("Arial", 16);
             
    // Create a copy of myFont.
    Font cloneFont = (Font)myFont.Clone();
             
    // Use cloneFont to draw text to the screen.
    e.Graphics.DrawString("This is a cloned font", cloneFont,
        Brushes.Black, 0, 0);
}
Public Sub Clone_Example(ByVal e As PaintEventArgs)

    ' Create a Font object.
    Dim myFont As New Font("Arial", 16)

    ' Create a copy of myFont.
    Dim cloneFont As Font = CType(myFont.Clone(), Font)

    ' Use cloneFont to draw text to the screen.
    e.Graphics.DrawString("This is a cloned font", cloneFont, _
    Brushes.Black, 0, 0)
End Sub

S’applique à