Font.Clone 方法

定義

命名空間:

System.Drawing

組件:

System.Drawing.Common.dll

套件:

System.Drawing.Common v9.0.0-preview.6.24327.6

來源:

Font.cs

建立這個 Font的確切複本。

public:
 virtual System::Object ^ Clone();

public object Clone ();

abstract member Clone : unit -> obj
override this.Clone : unit -> obj

Public Function Clone () As Object

傳回

Object

此方法所建立的 Font 會轉換成 Object。

實作

Clone()

範例

下列程式代碼範例是專為搭配 Windows Forms 使用而設計，而且需要 PaintEventArgse，這是 Paint 事件處理程式的參數。 程式代碼會複製 Font，並使用該字型繪製文字。

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