Font.FromHfont(IntPtr) 方法

定義

命名空間:

System.Drawing

組件:

System.Drawing.Common.dll

套件:

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

來源:

Font.cs

從指定的 Windows 句柄建立 Font。

public:
 static System::Drawing::Font ^ FromHfont(IntPtr hfont);

public static System.Drawing.Font FromHfont (IntPtr hfont);

static member FromHfont : nativeint -> System.Drawing.Font

Public Shared Function FromHfont (hfont As IntPtr) As Font

參數

hfont

IntPtr

nativeint

GDI 字型的 Windows 句柄。

傳回

Font

此方法所建立 Font。

例外狀況

ArgumentException

hfont 指向不是 TrueType 字型的物件。

範例

下列程式代碼範例是專為搭配 Windows Forms 使用而設計，而且需要 PaintEventArgse，這是 Paint 事件處理程式的參數。 程式代碼會執行下列動作：

• 取得 GDI 字型的句柄。

• 從該句柄建立 Font。

• 使用新的 Font，將文字繪製到畫面。

private:
   [System::Runtime::InteropServices::DllImportAttribute("gdi32.dll")]
   static IntPtr GetStockObject( int fnObject );

public:
   void FromHfont_Example( PaintEventArgs^ e )
   {
      // Get a handle for a GDI font.
      IntPtr hFont = GetStockObject( 17 );

      // Create a Font object from hFont.
      System::Drawing::Font^ hfontFont = System::Drawing::Font::FromHfont( hFont );

      // Use hfontFont to draw text to the screen.
      e->Graphics->DrawString( "This font is from a GDI HFONT", hfontFont, Brushes::Black, 0, 0 );
   }

[System.Runtime.InteropServices.DllImportAttribute("gdi32.dll")]
private static extern IntPtr GetStockObject(int fnObject);
public void FromHfont_Example(PaintEventArgs e)
{
             
    // Get a handle for a GDI font.
    IntPtr hFont = GetStockObject(0);
             
    // Create a Font object from hFont.
    Font hfontFont = Font.FromHfont(hFont);
             
    // Use hfontFont to draw text to the screen.
    e.Graphics.DrawString(
        "This font is from a GDI HFONT", hfontFont,Brushes.Black, 
        0, 0);
}

<System.Runtime.InteropServices.DllImportAttribute("GDI32.DLL")> _
Private Shared Function GetStockObject(ByVal fnObject As Integer) As IntPtr
End Function
Public Sub FromHfont_Example(ByVal e As PaintEventArgs)

    ' Get a handle for a GDI font.
    Dim hFont As IntPtr = GetStockObject(17)

    ' Create a Font object from hFont.
    Dim hfontFont As Font = Font.FromHfont(hFont)

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